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TASC. The Applesoft Compiler. 

It turns your Apple into 

a power tool. 



Step up to speed. TASC, the Applesoft Compiler, 
converts a standard Applesoft BASIC program 
into super-fast machine code. By 
increasing program execution speed 
up to 20 times, Microsoft gives 
you a power tool for Applesoft 
BASIC programming. 
Highest capacity available. 
TASC will compile and run 
larger programs than any other 
Applesoft Compiler. As a 
disk-based system, it doesn't 
require the simultaneous pres- 
ence of compiler and program 
in memory. The memory you save 
allows you to compile significantly 
bigger programs. 
Power without bulk. Code expansion of up to 100% 
severely restricts other compilers. TASC's special 
code compression schemes typically limit code 
expansion to only 25%. You'll really appreciate that 
with complex programs or programs that utilize 
Apple's hi-res graphic pages. 
More BASIC power. TASC's powerful new 
commands increase Applesoft BASIC programming 
capability. Chain with COMMON allows compiled 
programs to share variables, so a main menu 

'Applesoft is a trademark ol Apple Computer, Inc. 




"^> v supports several programs in a 
m\\ single runtime environment. 
^ V ' TASC's True Integer Arithmetic 
and Integer FOR... NEXT 
capabilities maximize the execu- 
tion speed of compiled programs. 
TASC's near total compatibility 

with Applesoft speeds compil- 
ation of existing programs 
with little or no modification. 
What about mistakes? You 
perfect your programs inter- 
actively with Applesoft. If some- 
thing does slip by, TASC recovers 
from errors discovered in compilation 
and traps all runtime errors. It even permits 
graceful interruptions during compilation. 
See for yourself. Ask for a demonstration of 
TASC at your Microsoft dealer. Discover the software 
package that turns your Apple into a power tool. 




CONSUMERS PRODUCTS 



A Division of Microsoft Inc 
10700 Northup Way • Bellevue, WA 98004 




JUDGE THE REST, THEN BUY THE BEST 

Only GIMIX offers you SOFTWARE SWITCHING between MICROWARE's OS-9 and TSC's 

FLEX. Plus you get the power of the GMXBUG system monitor with its advanced debugging 
utility, and memory manipulation routines. A wide variety of languages and other software is 
available for these two predominant 6809 Disk Operating Systems. 
You can order a system to meet your needs, or select from the 6809 Systems featured below. 

JUDGE THE FEATURES AND QUALITY OF GIMIX 6809 SYSTEMS 

GIMIX' CLASSY CHASSIS™ is a heavyweight aluminum mainframe cabinel with hack panel cutouls to conveniently connect your terminals, printers, drives, monitors, 
etc. A 3 position keyswitch lets you lock out the reset switch. The power supply leatures a terro-resonant constant voltage transformer that supplies 8V at 30 amps, + 15V at 
5 amps, and - 15V at 5 amps to insure against problems caused by adverse power input conditions. It supplies power tor all the boards in a fully loaded system plus two 
5 V< " drives (yes! even a Winchester) that can be installed in the cabinet. The Mother board has fifteen 50 pin and eight 30 pin slots to give you the most room for expansion 
of any SS50 system available. 1 1 standard baud rates from 75 to 38. 4K are provided and the I / section has its own extended addressing to permit the maximum memory 
address space to be used. The 2 Mhz 6809 CPU card has both a time of day clock with battery back-up and a 6840 programmable timer. It also contains 1K RAM, 4 
PROM/ROM/RAM sockets, and provides for an optional 951 1A or 9512 Arithmetic Processor. The RAM boards use high speed, low power STATIC memory that is fully com- 
patible with any DMA technique. STATIC RAM requires no refresh timing, no wait states or clock stretching, and allows fast, reliable operation. The system includes a 2 port 
RS232 serial interface and cables. All GIMIX boards use gold plated bus connectors and are fully socketed GIMIX designs, manufactures, and tests in-house its complete 
line of products. All boards are twice tested, and burned in electrically to insure reliability and freedom from infant mortality of component parts. All systems are assembled 
and then retested as a system after being configured to your specific order. 
56KB 2MHZ 6809 SYSTEMS WITH GMXBUX/FLEX/OS-9 SOFTWARE SELECTABLE 

With #58 single density disk controller $2988.59 

With #68 DMA double density disk controller $3248.49 

to substitute Non-volatile CMOS RAM with battery back-up, add 300.00 

for 50 Hz export power supply models, add 30.00 

Either controller can be used with any combination of 5" and/or 8" drives, up to 4 drives total, have data recovery 
circuits (data separators), and ire designed to fully meet the timing requirements of the controller I.C.s. 

5 V*" DRIVES INSTALLED IN THE ABOVE with all necessary cables 

DOUBLE DENSITY 





Formatted 


Unformatted 


Formatted 


Unformatted 




40 track (48TPI) single sided 


199.680 


250.000 


341 424 


500.000 


2 tor 1700.00 


40 track (48TPI) double sided 


399.360 


500.000 


718.848 


1.000.000 


2 for 900.00 


80 track (96TPI) single 


404,480 


500.000 


728.064 


1.000.000 


2 lor 900.00 


80 track (96TPI) double 


808.960 


1.000.000 


1.456.128 


2.000.000 


2 lor 1300.00 



Charl shows total 
capacity in Bytes for 
2 drives. 



Contact GIMIX for price and availability of 8" floppy dish drives and cabinets; and 5" and 8" Winchester hard disk system. 

128KB 2Mhz 6809 DMA Systems for use with TSC's UNIFLEX or MICROWARES's OS-9 Level 2 

(Software and drives not included) $3798.39 

to substitute 128KB CMOS RAM with battery back-up. add 552*25 

for each additional 64KB NMOS STATIC RAM board, add 639.67 

for each additional 64KB CMOS STATIC RAM board, add ^.M 

for 50 Hz export power supply, add 3000 

NOTE: UNIFLEX can not be used with 5" minifloppy drives. 

GIMIX has a wide variety ol RAM, ROM. Serial and Parallel I/O, Video, Graphics, and other SS50 bus cards that 

can be added now or in the future. Phone or write for more complete information and brochure. 

THE SUN NEVER SETS ON GIMIX USERS 

GIMIX Systems are found on every continent, except Antarctica. (Any users there? If so, please contact GIMIX so we can 
change this.) A representative group of GIMIX users includes: Government Research and Scientific Organizations in 
Australia. Canada, U.K., and in the U.S.; NASA, Oak Ridge, White Plains, Fermilab, Argonne, Scripps, Sloan Kettering, 
Los Alamos National Labs, AURA. Universities: Carleton, Waterloo, Royal Military College, in Canada; Trier in Germany; and 
in the U.S.; Stanford. SUNY, Harvard, UCSD, Mississippi, Georgia Tech. Industrial users in Hong Kong, Malaysia, South 
Africa. Germany, Sweden, and in the U.S.; GTE, Becton Dickinson, American Hoechst, Monsanto, Allied, Honeywell, Perkin 
Elmer, Johnson Controls, Associated Press. Aydin. Newkirk Electric, Revere Sugar, HI-G/AMS Controls, Chevron. Computer 
mainframe and peripheral manufacturers, IBM, OKI, Computer Peripherals Inc., Qume. Floating Point Systems. Software 
■houses; Microware, T.S.C., Lucidata, Norpak, Talbot, Stylo Systems, AAA, HHH, Frank Hogg Labs, Epstein Associates, 
Softwest. Dynasoft, Research Resources U.K., Microworks, Analog Systems, Computerized Business Systems. 




TO OflOER 8Y MAIL 
SEND CHECK OR MONEY ODDER 0B USE V0UR VISA OR MASTER CHARGE Please allow 3 weens tor personal checks to dear 
US oroers ado $6 handling I croer s under $200 00 Forego oroers ado SI0 nantUng II order is under $200 00 
Fcrrjgn orders over $200 00 wil rje shaped ve Emery Ar Freight COLLECT, am we w* charge no handtng All orders musl oe prepajo in U S 
funds PBKe note that foreign checks rave Deen taking about 8 weeks lor ccdecui so we wouH aottse winng money, or checks drawn on a 
oank account in n» U S Our bank is the Continental imas National Bank ot Chicago, acoouni 173-32033 Visa or Master Charge also accepteo 
GIMIX INC reserves trie right to change prong ana proauct specrrcauons al any ome without further nooce 
are mastered traoemarks ot GIMIX Inc 

FLEX AND Unittex are trademarks ot Technical Systems 

Consultants inc OS-9 Is a trademark ot Microware inc See their ads tor 

other BIMB compatible software 



GIMIX Systems are chosen by the Pros 
because of quality, reliability and features. 

Gimix 

The Company that delivers 

Quality Electronic products since 1975. 

1337 WEST 37th PLACE, CHICAGO, IL 60609 
(312)927-5510 • TWX 910-221-4055 
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DATA CAPTURE 4.0 s 

The most advanced and easiest to use telecommunications program for use 
with the MICROMODEM II® or the Apple COMMUNICATIONS CARD®. 



If you use your Apple lr® computer to communicate with other Apples or with timesharing systems, then you need Data Capture 4.0. 

If you want to save stock quotes, airline schedules, electronic mail, or other data from a remote computer system for future use, 
then you need a smart terminal program for your Apple ll'«. Data Capture 4.0 is the most user friendly and most flexible program of 
this type. It is specifically designed to take advantage of all the features of the Micromodem II®, but it works equally well with the Apple 
Communications Card® and several other popular serial 



interface cards. 

Data Capture 4.0 is the only Apple II® smart terminal 
program available which is fully copyable and modifiable. 
This means that you don't have to worry about backup. 
Go ahead and make all the backup copies you need. 

The unprotected format and helpful documentation 
make modifications to Data Capture 4.0 very easy to 
perform. In addition, full technical support is available by 
phone from Southeastern Software. 

Data Capture 4.0 has many other features. Incoming 
data files are automatically captured regardless of length. 
Data in the memory buffer can be viewed, edited, printed, 
saved to or loaded from disk, or transmitted to the remote 
system at any time. An unattended mode of operation is 
provided so that you can call your Apple from another 
location and send data to it or load data from it. Data 
Capture 4.0 is fully compatible with the Apple III® in 



Drive = 1 
Lines = 15 
Baud = 300 



Capture ON 
Sp. Char E3 



Data Capture 4.0 



Transmit ON 

Duplex 

Carrier 



Te'minal = 
@C 123 45 

XYZ-Network Connected 
Please Sign-on 
»ID ABC123 

Welcome to the XYZ-Network 
Time on 12:35:41 



Requires DISK lr®, Applesoft II® and 48K of Memory 
DATA CAPTURE 4.0© 1980-Southeastern Software 

•Apple* Apple II Plus**. Disk II* and APPLESOFT IP* are trademarks of Apple 

Computer Company. 

SOURCE - Source Telecomputing Corporation. 
'Micromodem** is a trademark of D.C. Hayes Associates, Inc. 



Select One Ot The Following 
A) wait Call 

C) atalog Disk 

D) eleteTexl 

E) nter Phone Number 
HJangup Phone 

I) nsert Text 
L)ist Text 
MlergeFrom File 
PJrint Text 
Q) uit Program 
S) end Text 
T) oggle 

A) Iternate Drive (1/2) 

B)aud Rate (110/300) 

Oapture (ON/OFF) 

D)uplex (FULL/HALF) 

L) ocal Carrier (ON/OFF) 

S) peccal Characters (ON/OFF) 

T) ransmit 
W) rite To File ■■■■■■■■ 

Which ■>( Press g ^to Abort 



emulation mode. It is also compatible with all popular 
lower case adapters for the Apple II®, including the widely 
used shift key modification. An automatic logon utility for 
use with the SOURCE is provided with Data Capture 4.0. 
Also included is a HELP text file containing the latest tips 
and suggestions on using Data Capture 4.0 effectively 
(many of these are the result of feedback from customers). 

See your local Apple dealer today for a demonstration 
of Data Capture 4.0 or order direct from Southeastern 
Software at the address below. 

(Please include $2.50 for postage and handling.) 

If you presently own a previous version of Data Capture 
you may upgrade to the new version for the difference in 
price plus $2.50 for postage and handling. MASTER CARD 
or VISA orders may be placed by phone. 

DATA CAPTURE 4.0 $65.00 

DATA CAPTURE 4.0/80' $90.00 

"Specify either Videx, Smarterm, Double Vision or 
Sup 'R' Terminal version 

— Dealer Inquiries Invited — 



Southeastern Software 

6414 Derbyshire Drive • New Orleans. 'Louisiana 70126 
(504) 246-8438 or (504) 246-7937 



'master charge 
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A TEAM OF 6809 SUPERSTARS; 

Smoke Signal's Chieftain™ Computer, 
and Software by Microware® 





HERE'S THE TOTAL 6809-BASED SYSTEM FOR THOSE WHO DEMAND 
UNSURPASSED POWER, FLEXIBILITY AND RELIABILITY 



After years of worldwide use in diverse and challenging appli- 
cations, the outstanding performers in 6809 computer opera- 
tions are SMOKE SIGNAL and MICROWARE. These leading 
companies are recognized as the undisputed choices when 
there is no room for compromises. 

WHY SMOKE SIGNAL AND MICROWARE LEAD 
THE 6809 FIELD 

Smoke Signal began pioneering research and development on 
6800/6809-based computer systems back In 1977. Microware 
worked three years to perfect OS-9'" and BASIC09.™ 

Both companies have evolved outstanding 6809-based 
products from early engineering research, and both pay 
almost fanatical attention to detail. For example . . . 

SMOKE SIGNAL'S 6809-based Chieftain'" computer series has 
proven its superiority in hundreds of demanding tasks. From 
gold-plated connectors to highest-quality materials throughout, 
each Chieftain™ is built to deliver absolute dependability from 
day one, and stay that way through years of service. 



Every Chieftain*" is meticulously 
ENDURANCE-CERTIFIED at 2.2 MHz. 
That's SMOKE SIGNAL'S endorse- 
ment of product perfection. 



^•EWDURANC&CEHTinED 5? 
ail r«ltumr Smokr g 
SI|tnnlqu.Tl!iy*nnlro*iiwa § 

MinMhlll |»«.!(U|]\ ,.llll— . 5? 

n uimpoiinii IB tire nl ilr 3 
livl-v,m<1mrrl*otrS(mN 3 
S .HI -P"illr.ilii.ii. j= 



MICROWARE's state-of-the-art OS-9 UNIX'-like operating system 
and the BASIC09 language have been developed in close 
coordination with computer manufacturers to maximize 
optimum system performance. The finest possible support and 

•UNIX is a trademark of Bell Telephone Laboratories. 




SMOEE SIGNAL 
BROADCASTING 



M1CROWAR6 

P.O. Box .1865 

Do MoinM, l.i.u 5030J 



31336 VIA COLINAS 
WESTLAKE VILLAGE, CA 91362 
TEL (213) 889-9340 



documentation further ensure satisfaction. Microware software 
performance is best summed up in this remark by a 25-year 
computer veteran: 

BASIC09 IS THE FIHEST HIGH-LEVEL LAriOUAGE I'VE EVER 
SEEH IH THE IIIDUSTRYr 

Thousands of engineers and programmers use MICROWARE 
software products as their standard time-saving tool ... to 
execute process-control applications . . . and for other vital 
functions. COBOL and PASCAL are also available under the 
OS-9 operating system. 

HOW THIS REMARKABLE TEAM Or COMPUTER 
SUPERSTARS CAIN SERVE YOU 
SMOKE SIGNAL'S Chieftain™ computer provides an array of 
configurations ranging from 5'/4-inch drives for single-user 
applications to multi-user, multi-tasking capabilities. Winchester 
hard-disk drive systems are also available. 

In other words, breathtaking power with as little as 48k 
memory; Microware's OS-9 Level Two can access up to one full 
megabyte that your Chieftain'" can address! 

One more sampling of the awesome processing potential 
at your fingertips with the Smoke Signal Chieftain™ computer: 

MICROWARE'S Stylograph screen-oriented word processing 
package instantly makes Chieftain™ an easy-to-use document 
preparation system with comprehensive editing commands. 

THERE'S MUCH. MUCH MORE! Call or write SMOKE SIGNAL 
for details on Chieftain™ computers and MICROWARE software. 

SMOKE SIGNAL Dealer opportunities are still available . . . 
please request information. 



□ Send information about Chieftain 
and Microware software. 



computers 
D Provide information about Smoke Signal's Dealer program. 
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The photo depicted on the cover is of 
the ancient Roman city of Pompeii. 
Located at the foot of Mt. Vesuvius, 
Pompeii was destroyed, yet preserved, 
by an eruption of that volcano in 79 
AD. The Roman architecture in those 
days depended heavily on the use of 
blocks, grouped together to form 
buildings and villas. Similarly, the 
present-day programming language Pas- 
cal takes advantage of block structure 
to form logical, well-defined programs. 
Could the Romans have invented 
Pascal? (For the answer, see PET Vet.| 

Cover photo by Ford Cavallari. 

Graphic produced with the cooperation 
of Computer Mart of Nashua, NH. 
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Well before the days of microcomputers, 
a new programming language entered 
the growing ranks of software options. 
This language was not altogether revo- 
lutionary; it embodied many concepts 
already available in other languages. 
And, it did not pretend to be inex- 
haustible or all-purpose, as did some of 
its contemporaries, the monoliths 
known as FORTRAN V, PL/I, and 
Algol-68. This new language was de- 
signed to be simple, yet complete, and 
concise rather than verbose. The new 
entry's name was Pascal. 

The Pascal language did not gain 
immediate popularity. It had no world 
council or multi-national corporation 
backing its implementation. However, 
it did have a beauty, a structured 
simplicity, which attracted many top 
educators and analysts in the field of 
computer science. Thus, Pascal achieved 
quick acceptance within educational 
and research communities. California's 
University of California at San Diego 
(UCSD) was one of the earliest institu- 
tions to latch onto Pascal. Pascal's small 
size and straightforward implementa- 
tion ensured its availablity to other 
communities. But, Pascal's foothold 
remained in the institutional com- 
munities only. 

The advent of microprocessor tech- 
nologies changed the character of com- 
puters — from necessarily large to con- 
veniently small. BASIC was picked as 
the high-level language of choice for 
the micros, partially because of its 
small size. Notably absent from the 
first-generation microcomputers were 
implementations of the monoliths — 
they were not feasible. Among the 
more advanced, structured languages, 
Pascal alone could be completely and 
efficiently implemented on a micro. 
Today, Pascal is available on virtually 
all 6809-based machines and on most 
of the 6502-based computers as well. 

Pascal boasts many features which 
set it apart from the primitve BASICs 
found on most machines.. Pascal em- 
bodies the four basic control structures 
which eliminate the need for GOTO 
statements, and hence line numbers. 
These structures, known as the se- 
quence (a line or sequence of state- 
ments), the if-then-else conditional, 
the do-while loop, and the for-next 
loop, form the basis for Pascal. See the 
"Precision Programming" article in 
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MICRO (42:06) for a complete dis- 
cussion of these constructs. Using 
these structures, program development 
time is reduced and code readability is 
enhanced. 

Pascal is also a procedure-oriented 
language. Analogous to the sections of 
BASIC code called by the GOSUB 
statement, procedures are used in 
Pascal to separate logically distinct 
functions and to perform repetitive 
tasks without duplicating code. The ad- 
vantage over BASIC is that procedures 
are defined with a list of formal 
parameters. Thus the procedure is able 
to modify only those variables which 
the programmer explicitly instructs it 
to modify. This feature, almost a 
necessity for larger program develop- 
ment, is not available in most BASICs. 

The final major advantage of Pascal 
is its strong but flexible typing of 
variables. Each variable used in a Pascal 
program must be declared as a type. 
The standard types are Boolean, in- 
teger, character, and real. Further types 
may be user-defined. All these types 
may be combined into a structured 
type; i.e. an array or a record. The 
"Pascal Tutorial" article in this issue 
(page 85| discusses variable types, as 
well as procedures. 

The availability and popularity of 
Pascal is sure to increase as time goes 
on. Apple Computer has been suppor- 
ting UCSD Pascal for two years. Com- 
modore has recently announced avail- 
ability of Pascal on their SuperPET and 
standard PET computers. The popular 
FLEX and OS-9 operating systems, 
built around the 6809, both offer im- 
plementations of standard Pascal. Even 
IBM has opted for Pascal over its own 
PL/I on their personal computer. The 
development of ADA, a large Pascal- 
like language, has also boosted Pascal's 
attractions. ADA is much larger than 
Pascal, and will be well-suited to large 
computer implementation. The more 
succinct Pascal will most probably re- 
main the microcomputer counterpart 
of ADA. 

MICRO'S coverage of languages will 
continue next month with FORTH. 
More Pascal material will be appearing 
in later issues. And, of course, coverage 
of the microcomputer workhorses, 
BASIC and machine language, will 
continue in each issue of MICRO. But 
for now, turn to the Pascal feature 
and survey the benefits of structured 
programming. 
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On Games 

Dear Editor: 

A few notes on your editorial com- 
ments about games. 

This is a nation of game players, 
particularly if the definition is broad- 
ened to include all forms of escapism. 
This does not seem to me an unreason- 
able amplification. Television watch- 
ing alone must consume enough hours 
to awe even Carl Sagan. And watching 
television is an activity usually lacking 
in any social value. Producers of televi- 
sion fare have learned to produce a 
mind-deadening, sense-tickling product 
which does little other than murder 
time. 



Nor is television the only enterprise 
dedicated to making the days pass. 
Much of sports, motion pictures and 
what passes for literature these days is 
equally dedicated to this end. 

Games too, of course, serve to mute 
the ticking clock. But games at least re- 
quire some participation. Games are 
the almost universal introduction to 
personal computers, and thus have the 
potential for drawing minds into the 
realm of computing, where they may 
be refreshed and expanded by the whole 
range of the computer's capability. 
There is, it seems to me, a real place for 
games. 

Whether that place is being realized 
is, however, an open question. Much of 
the current crop of games has no more 
real value than a drugstore's crop of 
paperbacks: lurid covers and dull in- 
teriors. The tack taken to protect this 
software denies the purchaser it's real 
value; not the running of the program, 
but the reading of it. And the under- 
standably sympathetic treatment soft- 
ware developers have received from 
their special medium denies the cus- 
tomer any voice. 

I seem, finally, to have come to the 
conclusion that computer games repre- 
sent another failed medium. Again, a 



medium of great potential power has 
been perverted to provide cheap thrills 
and Hi-Res graphics. Something seems 
to be wrong with our level of maturity. 
Maybe you're right. 

Bob Crafts 
Edgartown, MA 



Dear Editor: 

Your editorial regarding games for 
computers is straightforward and to the 
point. Software vendors, especially, 
often seem to be top-heavy with games. 

In my own opinion, though, total 
disregard for games is a bit heavy handed. 
Please consider the following: 

1. The "tools" for classic games 
such as Chess and Bridge are 
simple devices, yet these games 
have, for centuries, provided 
challenge and enjoyment. When 
the tool used in a game is a com- 
puter, the possibilities become 
mind-boggling. 



2. Modem quality control statistics 
is an outgrowth of gaming mathe- 
matics (not the other way 
around). A good game program 
can likewise teach good program- 
ming technique and computer 
capability, as well as entertain. 



3. Recreation, in itself, is socially 
redeeming. Computers labor 
hour after hour without com- 
plaint; but as a human, I enjoy 
an hour of Star Trek after work. 



Perhaps you could compromise and 
put in one game per issue. You would 
still have plenty of room for more 
serious articles. 

|im Haboustak 
South Euclid, OH 



What's What in "What's Where"? 

Dear Editor: 

Last week I received my copy of 
What's Where in the Apple. It's a great 
book and a valuable source of reference 
material, but something is missing! 

There is no explanation for the 
codes used in the \Use-Type\ col- 
umn. What is\HB\? What is\P2\? 

Ray Badowski 
Stratford, CT 

Editor's Note: The following guide 
will help clarify the Use-Type symbols. 



"What's Where" Use-Type Guide 

/SE/ 

1st letter — type information 

2nd letter — usage/length information 

Type Codes: 

S — Subroutine 
P — Parameter 
H — Hardware 
B — Buffer 

Usage/Length Codes: 

E — Entry 

B - Block 

n — n-Byte Long 

L — Label 

F-Flag 

Some Common Combinations: 

PI: 1-Byte Parameter 
Pn: n-Byte Parameter 
PB: Parameter Block 
HI: Hardware Location 
HB: Hardware Block 
FF: Hardware Flag 
SE: Subroutine Entry Point 
SB: Subroutine Block 
SL: Subroutine Label 
BB: Buffer Block 



(Continued on page 47/ 
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Introducing the M line . . . 

Now! Drive Systems for AIM, KIM and SYM Computers 

- from PERCOM. 



Assembled and tested systems start at only 
$599.95. including the drive controller cir- 
cuit card, disk-operating system, intercon- 
necting cable, drive and comprehensive us- 
ers manual. 

• The right storage capacity - Available in 1-. 2- and 3-drive 
systems, with either 40- or 80-track drives. 

• Flippy storage - Flippy drives (optional) let you flip a diskette 
and store data and programs on the second recording surface. 

• High Storage Capacity - Formatted, one-side storage capac- 
ity is 102 Kbytes (40-track drive). 205 Kbytes (80-track drive). 

• Proven Controller - The drive controller design is the same as 
the design used in the Percom 680X LFD mini-disk system. This 
system - introduced in 1977 - has given reliable service '"thou- 
sands of applications. Two versions are available: the MFD-C65 
(or the AIM-65 expansion bus, and the MFD-C50 for the Sys- 
tem-50 (SS-50) bus. 

• Includes an explicit data separator circuit that s reliable 
even at the highest bit densities. 

• Provides for on-card firmware. 

• Includes a motor inactivity time-out circuit. 

• Capable of handling up to four drives. 

• Capable of reading both hard- and soft-sectored diskettes. 



• DOS included - The MFD disk-operating system works with 
the AIM monitor, editor, assembler. Basic and PL/65 programs, 
interface is direct, through user I/O and Fl, F2 keys. Diskette in- 
cludes DOS source code and library of 20 utility commands. 

• Reliability assurance - Drives are bumed-in 48 hours, under 
operating conditions, to flag and remove any units with latent 
defects. 

• Full documentation - Comprehensive hardware and sott- 
ware manuals are included with each system. 

Now! Expand your AIM-65 with Low-cost System-50 
Modules. 

The Percom M65/50 Interface Adapter connects your M-65 bus to 
Percom's System-50 (SS-50) motherboard, allowing you to ex- 
pand your AIM. KIM or SYM with proven System-50 modules. 
You can add disk storage, memory modules.even a video display 
system. The M65/50 provides buffer-amplification of address, data 
and control lines. On-card decode circuitry lets you allocate ad- 
dress space either to the computer or to the expansion mother- 
board. Price: only $89.95, including System-50 motherboard. 

System Requirements: AIM-65. KIM or SYM computer with ex- 
pansion bus and four Kbytes RAM (min). 



PEflCCM 



PERCOM DATA COMPANY. INC. 

1 1220 PAGEMILL P.0 DALLAS. TX 75243 

(214) 340-7081 

Toil-Free Order Number: 1-800-527-1222 

PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE 

( 1181 PERCOM DATA COMPANY. Inc 

PERCOM. MFD-C50. MFD-C65 and M6550 ate trademarks ol Percom Data Company. Inc 

AIM.65 is a trademark ol Rockwell International. Inc 

KIM is a trademark ol MOS Technology Corporation 

SYM is a trademark of Synenek. Inc 
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I'd like to know more about Percom MFD drive sys 
Rush me free literature 

Send to , . 

PERCOM DATA COMPANY. Inc.. Dept. 65-M 

1 1220 Pagemill Rd Dallas, TX 75243 









J 

nuttibe 

MAIL TODAY! 



MICRO - The 6502/6809 Journal 



ARTSCI explains why some 

word processing systems 

are better than others. 



Let's begin with an easy to understand explanation of what a word 
processor is and how ARTSCI has created a professional system. 

A word processing system is simply 
an easier, faster and less expensive way 
to type. With a modern word 
processor, documents are entered on a 
video screen instead of paper. 

You can enter your first rough draft 
without concern about errors or 
spelling. Simply go back and insert 
letters, delete words and even move 
paragraphs with a few keystrokes. No 
document will ever have to be retyped. 

WORD PROCESSING 
AND THE APPLE II 



The APPLE II is the most 
expandable, inexpensive micro- 
computer available today. It can 
perform almost any task, including 
word processing. 

The standard APPLE II however, 
uses a 40 column video display. This 
display causes a serious word 
processing problem: How do you 
display a full sized 80 column letter? 
Most word processing programs 
available today do not solve this 
problem. 




of the paper through this MAGIC 
WINDOW as you typ 

The rule is: What 
you sec on the screen 1 
is what you'll get in 
print. However, 
if you print using 
proportional spacing, 
the result will look even 
better than the screen. 

This typewriter simulation, together 
with simple to use menu selection of 
functions and electronic editing 
abilities, creates the finest word 
processor available on the standard 
APPLE II. 

MAGIC SPELL 

The second feature of an advanced 
word processor is the ability to find 
and correct mistakes. The most 
common mistakes in most documents 
is the misspelled word. 

ARTSCTs MAGIC SPELL program 
will take any document you can create 
and find spelling errors. Over 14.000 
commonly misspelled words are known 
to MAGIC SPELL. You can also add 
new words to the vocabulary at any 
time. 

CUSTOM LETTERS 




Apple is a trademark of Apple Compulcr In 

the standard APPLE II computer 
system. 

ARTSCI TAKES THE 
WORK OUT OF 
WORD PROCESSING 




\ 



For a more thorough explanation of 
the ARTSCI word processing system 
send for our free booklet. 



THE MAGIC WINDOW 

ARTSCI has developed the MAGIC 
WINDOW word processing system 
that incorporates the full power of a 
professional word processor and solves 
the APPLE'S display problem without 
expensive hardware. 

The first feature of a professional 
word processing system is the ability to 
enter and edit data in a fast and 
friendly manner. The MAGIC 
WINDOW operates just like a 
standard typewriter. The electronic 
paper moves to the left across the 
video screen as you type. Almost any 
si/e document can be represented on 
the video screen. You can see the edges 



The third feature of a professional 
' word processing system is the ability 
to alter a document by replacing 
names and other related data from 
mailing lists. 



Form letters, invoices, and almost any 
document can be individualized by 
replacing names, addresses or any 
other personal data anywhere in the 
document using ARTSCI'S BASIC 
MAILER. 

By using the BASIC MAILER you 
can take any mailing list and sort 
through the list by different criteria 
and print personalized letters with a 
few simple keystrokes. 

A COMPLETE SYSTEM 

These three programs. THE MAGIC 
WINDOW. MAGIC SPELL AND 
THE BASIC MAILER, together form 
the only complete and professional 
word processing system available on 




Mail to: 

ARTSCI INC. 
10432 Burbank Blvd. 
North Hollywood. 
California 91601-9990 
(213)985-2922 



Name 



Company 
Address _ 
City 



State . 



Zip. 



Phone 



ST PE Mi_ CC BY CA 
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Atari 800 
Player/Missile Graphics 



"Player/Missile Graphics" can 
be applied to more than players 
and missiles. The author 
explains all and provides utility 
programs for the Atari 800. 



Mike Dougherty 

7659 West Fremont Ave. 

Littleton, Colorado 80123 



The hardware for the early Atari com- 
puting systems was designed for the 
video arcade market. To compete in 
this market, Atari made use of some 
very specialized chips. These video 
chips are able to combine several im- 
ages on a television raster image 
simultaneously through direct memory 
access (DMA) techniques. Fortunately, 
for Atari computer owners, the Atari 
800 hardware is basically the same. 
Thus, whatever an Atari raster-based 
arcade game does, the Atari 800 can do. 
The trick lies in learning how to pro- 
gram these specialized video chips. 

Hardware 

A comprehensive discussion of the 
Atari 800 Personal Computer System 
may be found in the two manuals avail- 
able from Atari, Operating System 
User's Manual and Hardware Manual. 
This article will concentrate on the 
graphics mode called "Player/Missile 
Graphics." 

A player or a missile is a small pat- 
tern that can be moved rapidly across 
the television screen. This terminology 
was first used when these small objects 
represented aircrafts, bullets, rockets, 
etc., in the original Atari video games. 
The usage of players and missiles, of 
course, is not limited to games. 



Player/Missile Graphics allows the 
final television image to be constructed 
from a main background bit map of nor- 
mal display memory (e.g. GRAPHICS 
8) superimposed with up to four players 
(PlayerO, Player 1, Player2, and Player3) 
and four missiles (MissileO, Missilel, 
Missile2, and Missile3). Each player 
consists of a bit map one byte (8 bits) 
wide and 128 or 256 bytes high. Each 
missile consists of a bit map two bits 
wide and 128 or 256 bytes high. (Dif- 
ferent Player/ Missile Graphics modes 
use different amounts of memory, but 
in either case, the full vertical extent of 
the television screen may be covered.) 

Every player and corresponding 
missile may be set to a separate Atari 
color, independent of the normal back- 
ground color. Thus, by setting a bit to 
one in a player or missile bit map, that 
color will be displayed on the televi- 
sion screen. By setting a pattern of bits 
to one in a player or missile bit map, a 
Player/Missile Graphics object is 
created. 

Player/Missile Graphics may be 
constructed on either a "single line 
playfield" or a "double line playfield." 



The single line playfield maps each 
player byte (two bits for a missile) onto 
one line of the television image, requir- 
ing 256 bytes for the complete bit map. 
The double line playfield maps each 
player byte (two bits for a missile) onto 
two consecutive lines of the television 
image, requiring only 128 bytes for a 
complete bit map. In addition, both 
double and single playfields may be one 
of three overall television screen widths: 
narrow, regular, or large. Each width 
affects the amount of memory required 
by graphics modes. 



The width of individual Player/ 
Missile objects may be normal size 
(GRAPHICS 8 resolution), twice nor- 
mal size, or four times normal size. 
Each player may be set to any allowed 
size, independent of the other player's 
size. However, all of the missiles must 
be the same size. If all four players are 
set to four times normal size and lined 
up side by side, the total width is that 
of the narrow playfield. In addition, all 
four missiles may be treated as a single 
fifth player — lined up this way they 
will cover a standard playfield. 



Table 1: Memory Map of Player/Missile Graphics 


Playfield 


Offset 






Mode 


to Base 


t Bytes 


Function 


Single Line 


+ 


768 


Unused by Player/Missile 




+ 768 


256 


All 4 missiles, 2 bits each 




+ 1024 


256 


PlayerO bit map 




+ 1280 


256 


Player 1 bit map 




+ 1536 


256 


Player2 bit map 




+ 1792 


256 


Player3 bit map 


Double Line 


+ 


384 


Unused by Player/Missile 




+ 384 


128 


All 4 missies, 2 bits each 




+ 512 


128 


PlayerO bit map 




+ 640 


128 


Player 1 bit map 




+ 768 


128 


Player2 bit map 




+ 896 


128 


Player3 bit map 
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Player/Missile Graphics enforce a 
programmable "image priority" scheme 
to handle the case of overlapping player 
bit patterns. If PlayerO has a higher 
priority than Playerl, PlayerO will 
overlap (hide) Playerl when the two bit 
patterns collide. The display chips also 
contain specialized collision registers 
to keep track of which players have 
overlapped or collided. These specialized 
hardware functions of the display chips 
allow the program the luxury of ignor- 
ing some very difficult problems. 
Specifically, as two player bit maps 
cross paths, no images have to be 
redrawn after the collision, and the 
background and players will maintain 
their programmed shapes. 



During the collision, the overlapped 
image will be automatically generated 
by the hardware. Further, due to the 
collision registers, the program does 
not need to compute if arbitrarily ir- 
regular images overlap — simply check 
the appropriate bit in the appropriate 
collision register. 



The horizontal positions of the 
players and missiles are determined by 
a set of horizontal registers. To move a 
player or missile to a specific horizon- 
tal position on the television image, 
the desired position is POKEd into the 
appropriate horizontal position regis- 
ter. Vertical movement must be 
accomplished by shifting the actual bit 
map in the player's or missile's display 
memory, up or down the desired num- 
ber of bytes. Rapid vertical movement 
may be accomplished through assem- 
bly level programming. 

To use Player/Missile Graphics, 
the following steps must be performed: 

1. Memory space for the Player/ 
Missile bit maps must be reserved. 
For single-lined playfields, 2048 
bytes are required, beginning on an 
even 2K address boundary. For 
double-lined playfields, 1024 bytes 
are required, beginning on an even 
IK address boundary. 

2. The page number (high order byte of 
the address) of that reserved 
memory must be POKEd into the 
Player/Missile Page Pointer to 
define to the hardware where the bit 
maps are located. 

3. Individual player and missile pat- 
terns must be POKEd into the appro- 
priate bit maps as detailed in table 
1: a bit equal to 1 turns on a pixel, a 
bit equal to turns off a pixel. 



Table 2: Register Description of Atari 800 



Address 

53248 
53249 
53250 
53251 
53252 
53253 
53254 
53255 

53256 
53257 
53258 
53259 
53260 

53248 
53249 
53250 
53251 
53252 
53253 
53254 
53255 
53256 
53257 
53258 
53259 
53260 
53261 
53262 
53263 

53278 



704 
705 
706 
707 
708 
709 
710 
711 
712 



$D000) 

$D001) 
$D002) 
SD003) 
SD004) 
SD005) 
SD006J 
$D007| 

SD008) 
SD009) 
SD00A) 
$D00B) 
$D00C) 

$D00O) 
$D001) 
$D002) 
$D003) 
$D004) 
$D005) 
$D006) 
$D007) 
SD008) 
SD009) 
SD00A) 
SD00B) 
SD00C) 
SD00D) 
$D00E| 
$D00F] 

$D01E| 



SO2C0) 
$02C1) 
$02C2) 
$02C3) 
$02C4) 
$02C5) 
$02C6) 
$02C7) 
$02C8) 

559 (S022F) 



54279 (SD407) 



Player 

Player 
Player 1 
Player 2 
Player 3 
Missile 
Missile 1 
Missile 2 
Missile 3 

Player 
Player 1 
Player 2 
Player 3 
All Missiles 

Missile 
Missile 1 
Missile 2 
Missile 3 
Player 
Player 1 
Player 2 
Player 3 
Missile 
Missile 1 
Missile 2 
Missile 3 
Player 
Player 1 
Player 2 
Player 3 

— all — 



Player/Missile 
Player/Missile 1 
Player/Missile 2 
Player/Missile 3 
Playfield 
Playfield 1 
Playfield 2 
Playfield 3 
Background 
... a n ... 



- all - 



Function 

POKE horizontal position of Player/ 
Missile bit map. 

|POKE will set horizontal register 
and PEEK will read collision 
registers described next.) 



POKE size of displayed bit map 

- normal size 

1 - twice normal size 

2 - normal size 

3 - four times normal size 



PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 
PEEK 



collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 
collision 



with Playfield 
with Playfield 
with Playfield 
with Playfield 
with Playfield 
with Playfield 
with Playfield 
with Playfield 
with Player 
with Player 
with Player 
with Player 
with Player 
with Player 
with Player 
with Player 



Reset all collision registers by 
POKEing into this register 

POKE color of 1 bit in displayed bit 
map: color = 16*hue + 
luminence, defined by Atari 
BASIC setcolor command. 

POKE color of bit in bit map 



POKE to specify Player/Missile 
graphics mode: 

61 - narrow playfield 

62 - regular playfield 

63 - large playfield 

45 - double line narrow playfield 

46 - double line regular playfield 

47 - double line large playfield 

Page of Player/Missile display 
memory 



Let the base address of the Player/Missile display memory be: 
B = PEEK(54729)*256 



B + 
B + 768 
B + 1024 
B+1280 
B+1536 
B + 1792 



($0000) 
|$0300) 
($0400) 
($0500) 
($0600) 
($0700) 



— not used — 
All Missiles 
Player 
Player 1 
Player 2 
Player 3 



Display memory offset for Player/ 
Missile playfields 61, 62, 63 

bit - color of background 

1 bit - color of player 

(Continued) 
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Table 2 (Continue 


d) 




B + ($0000) 
B + 384 ($0180) 
B + 512 ($0200) 
B + 640 ($0280) 
B + 768 ($0300) 
B + 896 ($0380) 


— not used — 

All Missiles 
Player 
Player 1 
Player 2 
Player 3 


Display memory offset for Player/ 
Missile playfields 45, 46, 47 

bit - color of background 

1 bit - color of player 


53277 ($D01D) 


— all — 


POKE a 3 to enable Player/ Missile 
DMA 



Listing 1: The BASIC Program Listing 



1000 

1001 

1002 

1003 

1004 

1005 

1006 

1007 

1008 

1009 

1100 

1101 

1 102 

1103 

1104 

1103 

1106 

1107 

1108 

1110 

1 115 

1 1 20 

1130 

1140 

1150 

1160 

1170 

1500 

1501 

1502 

1503 

1504 

1510 

1520 

1530 

1540 

1550 

1600 

1601 

1602 

1603 

1604 

1603 

1610 

1620 

1630 

1640 

1700 

1701 

1702 

1703 

1704 

1710 

1720 

1730 

1730 

1760 

1770 

1780 

2000 

2001 

2002 

2063 

2004 

2010 

2020 

2030 

2110 

2120 



DODGE 

DEMONSTRATION OF VIDEO 
PROCESSORS IN THE ATARI 
COMPUTER SYSTEM 

by Mike Dougherty 



READ AND POKE THE USR FUNCTIONS 
INTO PAGE 6 MEMORY. 
READ THE OBJECT AS HEX STRINGS 
AND CONVERT TO DECIMAL. 



REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

DIM BYTE* (2) 

ADDR=256*6:REM FREE BASIC MEMORY 

GRAPHICS 0:POKE 752, 1 : POSITION 10,5:PRINT "POKEing USR function' 

READ BYTES 

IF BYTE*="*»" THEN 2000 

GOSUB 1500 

POKE ADDR.BYTE 

ADDR=ADDR+1 

GOTO 1120 

REM 

REM 

REM . . . CONVERT BYTE* TO BYTE 

REM 

REM 

BYTE=0 

VALUE=ASC(BYTE*(1) ) : GOSUB 1600 

VALUE=ASC ( BYTE* ( 2 ) ) : GOSUB 1 600 

SOUND 0,0,0,0 

RETURN 

REM 

REM 

REM ... CONVERT ASCII TO HEX 

REM ... AND ACCUMULATE IN BYTE 

REM 

REM 

IF VALUE<58 THEN ' BYTE=BYTE*16+VALUE-48 

IF VALUE >57 THEN BYTE=BYTE*16+VALUE-55 

SOUND 0,BYTE, 10,8 

RETURN 

REM 

REM 

REM . . . OBJECT DATA FOR USR 

REM 

REM 

DATA 68,68,83,D1,68,85,D0,A0,FF 

DATA B1,D0,48,C8,B1,D0,AA,68 

DATA 91,D0,8A,48,C8,D0,F5,68,60 

DATA 68, 68, 85, Dl, 68, 85, DO, AO, 01 

DATA B1,D0,48,88,B1,D0,AA,68 

DATA 91, DO, 8A, 48, 88, DO, F3, 68, 60 

DATA ** 

REM 

REM 

REM ... PROGRAM THE VIDEO HARDWARE 

REM 

REM 

GRAPHICS 8 1 REM SET TO MODE WITH SPARE RAM 

POKE 732,1: REM NO CURSOR 

SETCOLOR 2,0,0iREM NO BACKGROUND 

POKE 339, 43: REM DOUBLE LINE NARROW PLAYFIELD 

POKE 704, 88: REM INITIAL COLORS 



4. Player/Missile colors, sizes, image 
priorities, and horizontal positions 
must be POKEd into the appropriate 
video chip registers. 

5. The Player/Missile graphics DMA 
must be enabled by POKEing a three 
into the Player/Missile Enable 
register. 

These video chip registers are detailed 
in table 2. 

A word of caution: use of Player/ 
Missile Graphics occasionally interacts 
with BASIC memory causing unexpected 
Atari behavior. When this occurs, sim- 
ply turn the power off and on to reset 
all of BASIC memory. While develop- 
ing Player/Missile programs, save new 
versions prior to execution. Once run, 
BASIC may not operate correctly! 1 

Demonstration 

The program DODGE, listing 1, 
demonstrates the use of Player/Missile 
Graphics and may serve as a basis for 
practical applications. This program 
utilizes the four players to form 
vertically-moving barriers, along with a 
single missile, to dodge across the 
screen under joystick #1 control 
(STICK(O)). Each time the missile col- 
lides with a moving barrier, the round 
is started over with all new player 
colors. Horizontal missile movement 
is controlled through BASIC state- 
ments, while the vertical barrier 
movements must be done via USR 
functions, due to the slow speed of the 
BASIC interpreter. 

A major problem with Player/ 
Missile Graphics is finding free 
memory on the correct address boun- 
dary to locate the player and missile bit 
maps. This memory should be pro- 
tected from modification by the pro- 
gram and BASIC. One such method is 
to use GRAPHICS 8. This graphics 
mode occupies the top 8112 bytes of 
memory, including overhead. Of this 
8112 bytes, 256 bytes are reserved for 
the display list, 6400 bytes are reserved 
for the GRAPHICS 8 image, 1296 bytes 
are unused, and 160 bytes are reserved 
for the text window. The trick is to set 



1 Specifically, I have had trouble in ad- 
ding new variables to a program after 
executing a Player/Missile Graphics 
program. Although the variable was 
recognized, the value could not be 
changed from zero. Apparently the 
variable table pointers were inadver- 
tantly modified by my use of Player/ 
Missile Graphics. 
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2130 POKE 705,88 
2140 POKE 706,88 

2130 POKE 707,88 

2210 SPACE=PEEK(106>-8:REM PAGE # OF FREE RAM (SORT OF) 

2220 POKE 3427"?, SPACE I REM POINT HARDWARE TO IT 

2230 POKE 33277, 3t REM ENABLE DMA TRANSFER 

2310 POKE 33236, 1 : REM DOUBLE SIZE FOR PLAYERS 

2320 POKE 33257, 1 

2330 POKE 53258, 1 

2340 POKE 53259, 1 

2350 POKE 53260,0. REM NORMAL SIZE FOR MISSILE 

2410 P0=SPACE*256+1024/2:REM PLAYER BIT MAPS 

2420 Pl=SPACE»256+1280/2 

2430 P2=SPACE*256+1536/2 

2440 P3=SPACE*256+1792/2 

2450 M0=SPACE«256+768/2tREM MISSILE BIT MAP 

2510 POKE 53248, 96: REM HORIZONTAL POSITION OF PLAYERS 

2520 POKE 53249, 168 

2530 POKE 53230, 132 

2540 POKE 53251,60 

2600 REM 



SET UP THE PLAYER PATTERNS 
BY SETTING ALL 128 BYTES TO 
THE DESIRED PATTERNS. 



2601 REM 

2602 REM 

2603 REM 

2604 REM 

2605 REM 

2606 REM 
2610 BYTE=0 

2620 FOR PATTERN=1 TO 8 
2630 FOR BAR=1 TO 8 
2640 POKE P0+BYTE.255 
2650 POKE P1+BYTE.255 
2652 POKE P2+BYTE.255 
2654 POKE P3+BYTE.253 
2682 POKE PO+BYTE+8,0 
2684 POKE Pl+BYTE+8,0 
2686 POKE P2+BYTE+8.0 
2688 POKE P3+BYTE+8.0 
2690 BYTE=BYTE+1 
2692 NEXT BAR 

2694 BYTE=BYTE+8 

2695 NEXT PATTERN 

2900 REM 

2901 REM 

2902 REM 

2903 REM 

2904 REM 

2905 REM 

2906 REM 

2910 SOUND 0,10, 100, B 

2920 POKE M0+60,3iREM INSERT MISSILE PATTERN 
2930 MISPOS"=50iPOKE 53252, MI SPOS: REM MISSILE HORZ POSITION 
2940 POKE 707,INT(RND(1)*15)*16+8:REM RESET PLAYER COLORS 
2950 POKE 704, INT(RNDd) *15) *16+8 
2960 POKE 706, INT (RND ( 1 > *15> * 16+8 
2970 POKE 705,INT(RND(1)*15)*16+B 

3000 REM 

3001 REM 

3002 REM 

3003 REM 

3004 REM 

3005 REM 

3006 REM 

3007 REM 
3006 REM 

3010 FOR LOOP-0 TO 1 STEP 

3020 IF BTICK(0)-11 THEN MI8P08-MIBP08-4iP0KE 33232, MI8P0S 

3030 IF STICK (0) -7 THEN MIBP0B-MIBP08+4I POKE 33232, MISPOB 

3040 X-U8R (23616, PO) I X-UBR (256*6+26, P2> 

3030 IF PEEK (33236)00 THEN 80UND 0, 100, 10, lOi POKE 33278, Oi GOTO 2900 

3060 NEXT LOOP 



SETUP BOUND, MISSILE, AND THE 
PLAYER COLOR — ENTRY POINT 
FOR EACH NEW ROUND. 



MAIN LOOP I 
MOVE THE MISSILE ACCORDING TO THE JOYSTICK 
MOVE EACH PLAYER PAIR UP OR DOWN WITH USR 
IF THE MISSILE HAS COLLIDED, THEN START OVER 

NEXT LOOP 



Listing 2: USR Functions to Move Players 

♦-$0600 



FREE MEMORY 



USR FUNCTIONS USED 3Y DODGE TO MOVE TWO CONSECUTIVE 
PLAYERS (256 3YT33) DOWN OR UP THE TELEVISION SCHES?. 
NOTE THAT MOVING A PLAYER UP IN MEMORY WILL MOVE THE 
DISPLAY DOWN THE SCREEN. USEi 

X-USR(1 536 .address of players) 
X-USR(1 562 .address of players) 



OODO 



PLAY-$OODO 



ZERO PACE POINTER TO PLAYERS 

(Con tinued) 



the base and mode of the Player/ 
Missile Graphics in such a way as to 
force the desired bit maps into the 1296 
bytes of unused memory. One solution 
is to set the Player/Missile base at 2K 
(eight pages) bytes below the top of 
memory in the GRAPHICS 8 image and 
use a single line playfield. This will 
allow the undisturbed use of all four 
missiles, PlayerO, and Playerl. 



A second solution, the one used in 
DODGE, is to set the Player/Missile 
base at 2K (eight pages) bytes below the 
top of memory in the GRAPHICS 8 im- 
age and use a double line narrow 
playfield. This will allow the use of all 
four missiles and all four players. 
(Specifying a narrow playfield reduces 
the normal 6400 bytes of GRAPHICS 8 
allowing the missile fields to be used.) 



In order to move a DODGE player 
upwards (downwards), 128 bytes must 
be rotated. Since BASIC is far too slow 
for this task, two USR functions were 
POKEd into the page of free memory at 
$0600 - $06FF. The USR function start- 
ing at decimal 1536 ($0600) rotates 256 
bytes (two consecutive players) down- 
ward on the television screen (upward 
in memory). The USR function starting 
at decimal ($061A) rotates 256 bytes 
(two consecutive players) upward on 
the television secreen (downward in 
memory | . By controlling the horizontal 
position of the four players, an alter- 
nating pattern of vertical movement 
can be established. 



By using simple variations of color, 
size, position, etc., the reader should be 
able to use DODGE to master Player/ 
Missile Graphics through simple 
experimentation. 



Mike Dougherty graduated from the 
University of Tennessee in 1977 with an 
M.S. degree in Computer Science, and is 
currently working at Martin Marietta 
Aerospace in Denver, Colorado. His home- 
based system presently consists of an Atari 
800 with 24K bytes of memory, the Atari 
410 recorder and the Atari 850 Interface 
Module for future communication with 
single-board computers. 
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BUY! SELL! TRADE 

COMPUTER & HAM EQUIPMENT 

Q COMPUTER" 
TRADER 



Mailed 1st class, 1st and 15th ot every month 
SEND ADS FIVE DAYS BEFORE MAILING DATE 



— RATES - 
Subscriptions Ads 



One Year S10.00 

Six Morns .. $6.00 

Per Copy $1 00 

Foreign (Air Mail). $25.00 yr. 



Hobby . 20' Word/Number 

Business 55" Word/Number 

(Non-Subscriber Add 15' 

Word/Number) 



Send Ads and Subscriptions wilh remittance lo: 

COMPUTER TRADER' 

Chet Lambert, W4WDR 

1704 Sam Drive • Birmingham, AL 35235 

(205) 854-0271 



For ads count name and address, words and numbers 

(zip/area code tree) 

Please include your name, address, call sign or phone number 



Listing 2 /Continued) 



0600 68 

0601 68 

0602 85 Dl 
06* 68 
0605 85 DO 
0607 AO FF 

0609 Bl DO 

0603 48 
060C C8 
060D Bl DO 
060F AA 

0610 68 

0611 91 DO 

0613 8A 

0614 48 

0615 C8 

0616 DO F5 

0618 68 

0619 60 



DOWN PLA 
PIA 
STA 
PIA 
STA 
LDY 
ISA 
?HA 

Dry 

DOWNLP LDA 
TAX 
PIA 
STA 
TXA 
PHA 
DfY 
BNE 
PIA 
RTS 



I 

03 



061A 68 
061 B 68 
061c 85 Dl 
061E 68 
061 F 85 DO 
0621 AO 01 
0623 Bl DO 

0625 48 

0626 88 

0627 Bl DO UPLP 

0629 AA 
062A 68 
062B 91 DO 
062D 8A 
062E 48 
062F 88 

0630 DO F5 

0632 68 

0633 60 



PIA 
PIA 
STA 
PIA 
STA 
LDY 
IDA 
PHA 
DEY 
LDA 
TAX 
PIA 
STA 
TXA 
PHA 
DEY 
3NE 
PIA 
RTS 
■ ErTD 



NUMBER OF USR ARGUMENTS (l) 
GET ADDRESS OF PLAYER BIT MAP 
PLAY+1 HIGH ORDER BYTE 

PLAY LOW ORDER BYTE 

#$FF POINT TO END OF BIT MAP 

(PLAY),Y SAVE ONTO STACK 

POINT TO FIRST OF BIT MAP 
(PLAY),Y SAVE CURRENT BIT PATTERN 

TEMPORARILY 

FETCH PREVIOUS BYTE 
(PIAY),Y PUT INTO CURRENT POSITION 

RECOVER OLD CURRENT 

PUSH ONTO STACK 

NEXT PLAYER BIT PATTERN 
DOWNLP DO ALL 256 BYTES 

CLEAN UP STACK 

RETURN TO BASIC 

NUMBER OF USR ARGUMENTS (1 ) 
GET ADDRESS OF PLAYER BIT MAP 
PLAY+1 HICH ORDER BYTE 

PLAY LOW ORDER BYTE 

#$01 POINT TO BEFORE FIRST 

(PLAY),Y SAVE ONTO STACK 

POINT TO FIRST OF BIT MAP 
(PLAY),Y SAVE CURRENT BIT PATTERN 

TEMPORARILY 

FETCH PREVIOUS BYTE 
(PIAY),Y PUT INTO CURRENT POSITION 

RECOVER OLD CURRENT PATTERN 

PUSH ONTO STACK 

NEXT PLAYER BIT PATTERN 
UPLP DO ALL 256 BYTES 

CLEAN UP STACK 

RETURN TO BASIC 
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DOUBLE DOS PLUS 

for Apple Computers 
$39.00 



201-839-3478 



MasterCard! 



1 



■Hi 




DOUBLE DOS Plus— a piggyback board that plugs into the 
disk-controller card so that you can switch select between 
DOS 3.2 and DOS 3.3. Works with the language system elimi- 
nating the need in many cases to boot the BASICs disk. Also 
eliminates the chore of converting all of your 3.2 disks to 3.3 

NOTE: APPLE is a registered trademark ol APPLE Computer, Inc., Cupertino, CA. 

WHY IS DOUBLE DOS PLus better? 

• Nothing needs to be soldered, just plug in and go. 

• Since all four ROMS are used, all software will work, 
even early 3.1 DOS. 

• Because the ROMS fit on the back of the board, it has 
the thinnest configuration allowing full use of slot #7 

• One set of ROMS is powered up at a time, thus saving 

power. DOUBLE DOS Plus requires APPLE DOS ROMS 

• Full 90-day warranty from TYMAC. 

MICRO-WARE DISTRIBUTING INC. 

P.O. BOX 113 

POMPTON PLAINS, N.J. 07444 





^OTME^JKtQUEPRODUCTSFRGiMJjCROJ*^ 

THTAPPLECARD^^wosKJe<^00^>las7creferencecaro^^ 
Loaded with information of interest to all Apple owners $3 98 

PARALLEL PRINTER CARD— PPC-100— A Universal Centronics type parallel printer 
board complete with cable and connector This unique board allows you to turn on and off 
the high bit so that you can access additional lealures in many printers Use with EPSON, 
ANADEX. STARWRITER. NEC. SANDERS. OKI, and other with standard Centronics 
conliguration — /T\ $139.00 



■i^^C> 
U',::,,,'i, 

iiiMi.i* i 'I'ltr 

THE DOUBLE BOOTER ROM— Plugs into the empty D8 Socket on the Apple mother- 
board or the Integer ROM Card to provide a 13 sector boot without using the BASICS Disk 
DoubleBooter may also be used in Ihe MOUNTAIN HARDWARE ROM PLUS board This 
chip will not work in a plus machine unless it contains an Integer board or a ROM Plus 
board $29 00 

DISK STIX — Contains 10 dozen diskette labels with either 3.3 or 3.2 designation Room 
lor program names and type also $3.98 

*********** * SOFTWARE* **********V» 
SUPER SEA WAR— Hires battleship type simulation . $13 95 

ULTIMATE XFER — A telephone soltware transfer program, uses DC Hayes Assoc 
micromodem $2500 

ROAD RALLYE — Hires driving game with 5 diflerent lull screen tracks $15 00 

MISSILE CHALLENGER — Hues arcade type game where you delend your cities trom 
tailing missiles. 8 levels & writes name & high score lodtsk $19.95 

SUPER PIX— Hires screen dump lor the EPSON MX-80, inverse or normal, larger than lull 
page graphics in 2 orientations Needs Tymac PPC-100 Printer board or we will upgrade 
your EPSON board lor $25 $39 95 

QRAPH-FIT— A hires graphing program that produces bar charts, pie charts and line 
graphs Has auto scaling leature too $2*00 

■—■STILL MORE APPLE GOODIES i 

APPLE KEYBOARD SYNTHESIZER-49 note |C lo C) AGO Keyboard with 3 sawtooth sq wave 
shapers. 3 audio oscllators. 3 low pass inters, 4-64 point shape controllers, 2 envelope 

generators. Complete system $995 

KEYBOARD ONLY with Apple Interlace ........ ....[..[ .[.... . $649 

GRAPHIC NOTEWRITER— Hires note write tor synthesizer system $99 

SUPER PIX OKI— Hires screen dump lor OKI Microllne 80. 82. 83 Printers. Same features as 

super pix. Needs Tymac PPC-100 Board $24 95 

NIBBLES AWAY— The best disk back up program to date Allows you to make backups of mos; 
every dak ever produced for the Apple Over 1 user defined parameters including synchronized 
& unsynchromzed copies as well as automatic half tracking and raw date transfer $59 

^^^^^^Ca2M3J34 



A BRIGHT NEW STAR FROM 
ANDROMEDA! 



• 



A 




NEW ROM BOARD FOR THE APPLE II* 
$125.00 WITH UTILITY ROM. 



With Andromeda 's new ROM Board, you can plug many 
useful utility programs into your Apple II. Because ROM 
memory never forgets, you can access these utilities 
instantly without having to load them from disk. 

The ROM Board comes with the utility ROM, which 
gives you five powerful options to apply to your 
Applesoft* programs. With the Utility ROM, you can do 
automatic line numbering, control a program list with a 
page mode, restore a crashed Applesoft* program in 
memory, alphabetize a disk catalogue and create a disk 
without DOS. giving you an extra 8K on your disk. Any of 
Soft Control Systems' other ROMS can be used, such as 
the Dual DOS in ROM, and Your'ple ROM. 

You can install 2K PROMS. 4K PROMS, or even 2K 
RAM chips in each of the two memory sockets. So you 
can even have the Read - Write capability of RAM to 
develop PROM Programs yourself, or just have an extra 
2K RAM for your machine - Language programs. Two 
2732 PROMS allow a total of 8K of memory on the Board. 



Now with One Year Warranty. 

ANDROMEDA 

' M INCORPORATED 

£•£ Greensboro, NC. 27410 
919 852-1482 P.O. Box 19144 

Price for Andromeda 16K RAM 
expansion board now only S 120.00. 
Please add S5 for shipping and 
handling. North Carolina res/dents 
add 4% sales tax. 
*DEALER INQUIRIES WELCOME 






We'd like your 

~[cippkz to meet 
The 
Executive Secretary 

The professional 
word processing system 
for the Apple™ computer 



GENERAL 

Editing, printing, form letters, mail-merge, and electronic 
mail all in one package at one price? 



User's manual designed for the user? 



User -controlled configuration of printers, slots, drives, 
and 40/80 column editing? 



THE MANUAL 

Complete index included? 



►" 



y 



<s 



v* 



Organized aa a set of lessons? 



Easel-bound for ease of use? 



THE DOCUMENT PRINTER 

Integrates files from DB MASTER'S Utility Pack"'', The 
Data Factory '', Visicalc "'', Information Master"', and most 
DIF ■'files. 



Accepts keyboard input at print time? 



Supports all major printers, including Centronics 737 
and IBM ET- series? 



Has IF and related commands to allow conditional 
printing of information based on the contents of a 
database or on keyboard input? 



Prints page headers of arbitrary complexity? 



Prints page numbers wherever you want them? 



Automatically generates alphabetical index for words 
you specify? 



Supports file chaining and file nesting? 



Has multilevel outline indenting? 



Has left- and right-Justified tab stops? 



Gives full control of all margins, dynamic text 
reformatting, centering, and Justification? 



Supports Thunderclock '' and the CCS clockcard for 
automatic dating? 



•* 



•* 



\S 



v> 



S 



S 



S 



check this chart: 



INTEGRATED CARD FILE FEATURES 

Allows multiple card files per disk? 



Allows user to define size and content of 'cards' 
in each file? 



Generates new subset card files based on search or sort 
criteria for an existing file? 



Incorporates one/multiple line report printer 
for card files? 



Allows totals and subtotals during report printing? 



THE DOCUMENT EDITOR 

Keeps up with professional typing speeds? 



User-defined phrase abbreviations? 



40 or 80 character edit modes user-selectable? 



Supports Smarterm , Superterm", Videoterm"' and 
Full View 80 v . 



Uses real shift key? 



Supports file merge and unmerge? 



k" 



k* 



Global search and replace? 



Block operations: move, transfer, delete? 



Character/word/line: insert/replace/delete? 



Allows embedded commands to control special 
printer functions? 



ELECTRONIC MAIL SYSTEM 

Menu driven? 



Multiple document queuing? 



Fully automatic with Hayes modem? 



Published by: 




4306 Upton Avenue South 
Minneapolis, Minnesota 8S410 
Phone (612) 929-7104 



Distributed 
by: 



Aurora Systems 

2040 East Washington Ave. 

Madison, WI 53704 

(608) 249-5875 



Eastern Software 

17 Commerce Street 

Baltimore, MD 21012 

(301) 539-5022 



Software Express 

2615 Miller Avenue 

Mountain View, CA 94041 

(415)949-1118 
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SEC 

Microcomputer 




PC-8001A 32K Computet CALL 

PC-8012A I/O Unit w/32K RAM CALL 

PC-8013A Dual Mini-Disk Drive Unit CALL 

PC-8001 MulliCardwaie(FDI/0& 32K) CALL 

CP/M 2.2 Operating System lor NEC 129 

WordStar configured for NEC 299 

SuperCalc configured for NEC 279 

NEC Wordprocessor & Accounting Softw we CALL 

Many more software packages and languages; 
(Pascal. Fortran. Cobol. etc) are available configured for 
the NEC 8001 A Computer. 
Please call or write for a product price list. 



ATARI 
800 
16K 

$749 



Atari 400 W/16K 349 

410 Program Recorder 65 

810 Disk Drive 449 

825 80 col. 7x8 Dot matrix Impact printer 699 

822 40 col. Quiet Thermal Printer 349 

850 Interface Module 159 

Atari 16K Ram Module 69 

Axlon Ramcram 32K Module 189 



Video Monitors 

Amdek/Leedex Video 100 12" B&W 155 

Amdek/Leedex Video 100G 12" Green Phospfaer . . . 179 

Amdek (Hitachi) 13" Color w/audlo output 389 

NEC 12" Green Phospher Display JB-1201M CALL 

NEC 1 2" Lo-Res Color Display CALL 

NEC 12" Hl-Res RGB Color Display CALL 

Sanyo 9" B»W Display 185 

Sanyo 9" Green Phospher Display CALL 

Sanyo 12" B&W Display 269 

Sanyo 12" Green Phospher Display 285 

Sanyo 13" Color Display 449 

Zenith 1 2" Green Phospher Display ZVM- 121 149 




ZENITH 

12" 
GREEN 

149 



VIC20 



$259 



Personal 
Computer 

Color " Sound " Graphics 
Call or write for more info. 
Disk drives available soon! 




^cippkz computer 

^••r- Authorized Dealer 




APPLE II PLUS 
16K NOW $1025 
48K NOW $1089 
64K # now $1199 

'48K Apple with 16K RamBoard 



APPLE DESK 
DRIVES 

$439 

w /controller and DOS 3.3 $499 




Apple Cards and Hardware 

Language System w/ Pascal & BASICS 379 

Silentype Printer u> interface card S49 

Hayes Micromodrm II 299 

Novation Apple-Cat 339 

Vldex Vidcoterm 80 column card 269 

Vldex Keyboard Enhancer 115 

Z-80 Softcard by Microsoft 299 

16 K RamCard by Microsoft 169 

CPS Multi-function card 189 

Software for the Apple 

VislCalc version 3.3 159 

VislFUe (NEW data base manager) 199 

VisiTrend 'VlslPlol 219 

DB Master 1*9 

WordStar (Apple 80 col. version) 249 

Dow Jones Portfolio Evaluator 45 

Apple Post 45 

Apple Writer 65 

Dow Jones News aV Quotes Reporter 85 

Apple Plot 68 

Tax Preparer 99 

Real Estate Analyzer 129 



16K RAMBOARD by ConComp 

for Apple II Computers 



$ 



FOR ONLY 



129 



95 




AVAILABLE NOW 




100 



California Computer 
Systems 

Floppy Disk Controller $369 

64K Dynamic Ram Board, 200ns $499 
Z-80 CPU board w/ monitor ROM $269 

16K Static memory board. 200ns 369 

32K Static memory board, 200ns 599 

S-100 12 Slot Mainframe 475 

4-Port Serial Interface 299 

2-Port Setlal/2-Port Parallel Interface 299 

4-Port Parallel Interface 229 



Printers 
Silentype 

w/ Apple II Interface 

$349 

Epson 
MX-80 or 
MX-80 FT 

CALL 

Anadex 9501 w/2K Buffer 1349 

C. Itoh Starwriter 25 CPS dalsywheel 1449 

C. Itoh Starwriter 45 CPS dakvywheel 1649 

Epson MX-70 CALL 

Epson MX-80 & MX-80 F/T CALL 

Epson MX-100 CALL 

NEC 8023 Impact Dot Matrix 695 

NEC Splnwriters (Latest models) CALL 

Paper Tiger IDS-445G w ,' graphics 699 

Paper Tiger IDS-460G w/graphlcs 949 

Paper Tiger IDS-560G w/graphlcs 1249 

Silentype Printer w/Appte interface 349 

Qume Sprint Dalsywheels (Latest models) CALL 




ORDER TOLL FREE 

800-854-6654 

In California and 
outside continental U.S. 

(714) 698-8088 

Telex 695-000 Beta CCMO 



Send Orders To: 



Ordering information. Phone orders using VISA. MASTERCARD 
AMERICAN EXPRESS. DINERS CLUB. CARTE BLANCHE, bank 
woe transfer cashier's or certified check, money order, or personal 
check (allow ten days to clear) Unless prepaid with cash, please add 
5% for .hipping, handling and insurance, (minimum 5 00) Califor 
ma residents add 6% sales lax. We accept CODs OEM's. Institutions 
and corporations please send for a written quotanon All equipment 
is subject to price change and availability without notice All equip 
men! is new and complete with manufacturer's warranty (usually 90 
days) Showroom prices may differ from mall order prices 

'g Mailorder 

8314 Parkway Drive 
La Mesa, Calif. 92041 



Experimenters and the 

Color Computer 



A brief summary of the normal 
capabilities of the TRS-80 Color 
Computer, and an examination 
of the unit's I/O capability. 
Detailed instructions are given 
for home-brew software 
expansion via the Program Pack 
port, and a list of vendors of 
software and hardware 
expansion provided. 



Ralph Tenny 
P.O. Box 545 
Richardson, Texas 75080 



An Overview 

Radio Shack's TRS-80C Color Com- 
puter is two machines in one: it is a 
really fine games machine with good 
color graphics capability, and it is the 
start of a very powerful, low-cost ex- 
perimenter's computer. Unless you are 
really into color graphics, however, the 
graphics capability could get in your way. 

That last statement deserves a bit of 
explanation. When you first get your 
Color Computer, it is a real shake-up to 
enter ?MEM and get the answer "8487". 
8K bytes out of 16K? What gives? The 
answer is that the machine auto- 
matically reserves four screens (1.5K 
per screen) of space for color graphics, 
whether or not you plan to use any 
graphics! Most of this memory can be 
recovered using the command "PCLEAR 
1". This forces the computer to reserve 
only one screen for graphics. A second 
procedure gets it all back: 

POKE 25,6;ENTER;NEW;ENTER 

As you look at the machine, you 
will notice that the keyboard isn't a 
full, professional keyboard. What is 
there is actually quite good for the 
overall cost/features trade-off. The 



back panel of the machine has a num- 
ber of openings for printer cable, 
joysticks, RF outlet to the color TV set, 
and cassette cable. On the right side 
you'll find a slot to accept the Program 
Packs, which are Radio Shack's major 
software distribution media. This same 
slot is also the computer's expansion 
port, which is already being taken ad- 
vantage of by some manufacturers sell- 
ing expansion hardware packages. Some 
of these manufacturers and their pro- 
ducts are listed later in this article, but 
the field is expanding so rapidly that 
publication deadlines prevent inclusion 
of the newest ones. 

One of the major features of the 
machine is the internal architecture, 
which is superbly laid out with very 
cost-efficient design. The details of this 
architecture have been thoroughly des- 
cribed', and most will not be repeated 
here. The major advantage of the Color 
Computer may well be the fact that the 
memory map is software selectable to a 
great degree. Also, the expansion port 
has a decode defeat line which allows 
an external peripheral to re-assign the 
entire memory map except for the dis- 
play and I/O hardware which are 
located above SFF00. 

Much of the joy in working with the 
Color Computer is finding all the built- 
in "hooks" which were left for future 
expansion, but I have also greatly en- 
joyed working with the 6809 processor. 
As MICRO editor Robert Tripp has 
already pointed out, the 6809 is really 
what all us 6502 buffs have wished for 
but couldn't have until now! 

Modification Ideas 

Two items are an absolute "must" 
for anyone contemplating modification 
of the Color Computer: a copy of 
Reference 1, and the Service Manual for 
the Color Computer. The stock number 
for the Manual is 26-3001/3002, and it 
most likely will have to be ordered by 
your local Radio Shack store. The 
manual gives schematics, service infor- 
mation, and a description of operation 



for most of the circuits. Even with 
these resources, I recommend, that you 
not attempt hardware modifications un- 
less you have considerable experience 
with computers and digital hardware. 

One of the most obvious areas for 
changing the Color Computer is via the 
Program Pack port. New software can 
be installed in 2716 or 2732 EPROMs, 
by modifying one of the cheapest Pro- 
gram Packs. It is possible to (carefully!) 
unsolder the masked ROM present in 
these packs and replace it with a 
socket. If this is done, the original 
ROM should work in the socket, in 
case you want to restore the original 
function. 

If you compare the EPROM pinouts 
vs. the socket connections in the Pro- 
gram Pack, you will see that the Intel 
format 2716's and the 2516 and 2532 
EPROMs from Texas Instruments will 
(almost) drop into the sockets. A few 
minor etch cuts (summarized in figures 
1 and 2) will allow proper operation of 
these EPROMs in place of the original 
masked ROM. The etch cuts required 
for the 2716/2516 (essentially identical 
parts) are shown in photos 1 and 2. 
However, if you want to run two 
EPROMs, some additional address de- 
coding will be required so that the two 
ROMs do not interfere with each other. 
This decoding can be done by using a 
single quad NAND gate as shown in the 
circuit in figure 3, and further detailed 
in photos 1 and 2. A few more changes 
would be required to adapt the Intel 
2732 to the address connections used in 
the Program Pack, and these are detailed 
in figure 4. Photos 3 and 4 show the 
modified PC card installed in the Pack, 
and the Pack installed in the computer. 

You need to consider one additional 
modification to the Program Pack 
before you can use it without inter- 
ference from the BASIC ROMs installed 
in the computer. The regular BASIC 
(not Extended BASIC) checks for the 
presence of a Program Pack and vectors 
into the Program pack if it is installed. 



18 



MICRO - The 6502/6809 Journal 



No. 44- January 1982 





FT 5 




Photo 1: Component side view of Program Pack card, with 
two-ROM modification, defeat switch and decoding Installed. 
Black circles mark etch cuts; the left one inhibits pack 
autostart. The other etch cut Isolates A12 which, in turn, Is 
used as Block Select by the decoder. 



Photo 2: Back side of Program Pack card. White arrows 
show etch cuts; bottom one Isolates all; adjacent Jumper 
grounds pin 18 on ROMs for 2716/2516 use. Restore this 
connection for 2532 EPROMs. The other two etch cuts 
Isolate Incoming decode signal lines to allow separate 
decoding. 



We review products from every source end orry ALL ol THE BEST 




PRODUCTS 



we offer products from 

'ark Data • Micro Works 

Shack • Book Publishers 

NEC • Centronics • Moore 

: Color Invaders • Color Pac Attack 

lomtor ■ Adventure Games • Text Editors 

Assemblers • PASCAL • Magikube 

Finance Programs • Color Data Organizer 

Graphic Games * Disassembler 

HARDWARE: 32K RAM Expansion Board • 16K RAM Set 
Cables • Interlaces • Power Pack ROM Cartridge • Printers 

ACCESSORIES: Books • Cassettes • Supplies • Service Manuals 

Look to COMPUTERWARE for DISK SOFTWARE 

* * * NEW PRODUCTS * * * 

16 PLUS BOARD — just plug in to expand trom 16K to 32K 

PAC ATTACK - graphics action game — PAC ATTACK 

32 K versions oi Editor, Assembler. Monitor, PASCAL, BERSERK game - 

Micro Text (communications) - STAR BLASTER 
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6809 Specialists 
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COMPUTERWARE' 



Depl. C • Box 668 

Encinilas, CA 92024 • (714) 436-3512 



trademark ol Computerware. 



RS-80COL0R 

COMPUTER 

SOFTWARE 

FORTH FOR THE TRS-IO COLOR COMPUTER DISK SYSTEM 

Trying to get control of your Color Computer?? Tired of translating HEX to decimal?? 
Tired of remembering where the VDG and SAM are and how to program them?? Want 
to write machine language code with assembly language mnemonics instead of 
POKES?? 

Want to write programs In half the time?? Want to write lots of small pieces of code 
that you can put together in seconds to do BIG JOBS??? Want a language that is at 
least 5 to 10 times faster than BASIC??? Want to learn everything there is lo know 
about FORTH, with the best manual on the market, including lots of examples of 
FORTH applications, and detailed explanations of how everything works?? 
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FORTH 

Includes Editor. 6809 Assembler, «---- 
String Functions. Disk Data file jQQ^ 



Operations and Much Much More! 
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THE COLOR TOOLKIT 

Utility and Diagnostic Disk Programs by Dick Bartholomew 

The COLOR Toolkit is a set of Disk diagnostics and Disk utilities for the TRS-80 Color 
Computer Disk System. Dick Bartholomew, well known for his utility programs for 
FLEX systems, has created a package of invaluable toots for the serious programmer. 
These include: Reading FLEX disks. Writing FLEX disks. Repairing Radio Shack 
disks. Extended directory, and many, many more. 

PRICE ONLY $49.95 on RS disk. 

U.S.A. AOD J2.00 FOR STANDARD UPS SHIPPING S HANDLING 
FOREIGN ORDERS ADD 10% SURFACE. 20% AIRMAIL 



FRANK HOGG 
LABORATORY 

130 MIDTOWN PLAZA, SYRACUSE, NY 13210 (315) 474-7856 
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Photo 3: Modified Program Pack card installed in carrier. 
Center post in carrier holds screw to secure lid; case also 
snaps together along edges. Lower half of case must be 
notched for switch. 




Photo A: Program Pack installed; note case cutout and pro- 
truding defeat switch handle. 



Your Apple too slow ? 
Not anymore... 



Now you too con write 6809 programs for your Apple II that ore 
DOS 3.0 comporible. Bur you don't hove ro stop rhere. you con 
also program your Apple Us 6502 and the 6809 of THE MILL ro run 
SIMULTANEOUSLY. 

THE ASSEMBLER DEVELOPMENT KIT including THE MILL, is a full 
feature assembler, designed to use the text editing system of your 
choice. The system will also boost your computer programming 
productivity, since the 6809 is today's eosy to learn and program 
computer. Take advantage of the 8-bit 6502 and the 16-bit 
abilities of the 6809 running ot the same time, create your own 
MULTIPROCESSING ENVIRONMENT on the Apple II. 

Put THE MILL into your Apple II and ger power, performance ond 
price matched by no other personol compurer. STELLATION TWO 
offers a full 1 yeor warranty and a 60 day money back guarantee, 
if you're not completely satisfied with the power of THE MILL. 

Shop around, then compare the service, quality, price and 
power of THE MILL. Take this ad to your local Apple Dealer and see 
the endless possibilities of adding THE MILL to your Apple II, 





THE MILL transforms rhe 8-bir Apple II 
into a computer that acts like o 
16-bir machine. THEMILLhos 
unique hardware features that 
permit the 6809 to run at full 
speed ( 1 megahertz) and 
allow the 6502 to run at 
20% of its normal 
speed — 
ATTHE SAME TIME! 



Find out about 
THE MILL and get 
involved with the 
hottest item on the 
personal computer 
market today 

No existing personal computer 
cangiveyou the power. 

performance ond price of THE MILL'S 

6809-6502 combination. 



Apple II 
is a trademark 
for Apple Compurer, Inc. 



..,■."-■;.; 



PO BOX 2342 -N7 
SANTA BARBARA, CA 93120 
(805)966-1140 
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Figure 1: High order address lines and chip select connections on 
standard game pack cartridge. 



This is accomplished by interconnect- 
ing two pins on the PC board in the 
Pack. Pin 7 of the port is connected to 
pin 6 of the port only when the pack is 
in place. This path must be interrupted 
if you do not want the Pack to take over 
automatically. In photo 1, the left-hand 
card edge pin is circled, indicating the 
required etch cut on top the board. 

The switch shown in this series of 
photos is shown also in the circuit of 
figure 3, along with a necessary pull-up 
resistor. Normally, the Pack can be ac- 
cessed from BASIC using "EXEC 
49152". If this switch is open, entry in- 
to the Program Pack is blocked. 



External I/O 

The Color Computer does not have 
any kind of external I/O capability ex- 
cept for the ports intended for use with 
the regular peripherals — printer, 
cassette recorder and game paddles. If 
an applications program is placed in the 
Program Pack, some of these ports can 
be made available for external I/O of a 
limited form. Let's examine the I/O 
capability of these various ports: 

Game Paddle Ports — One discrete 
switch closure to ground and two 
voltage inputs at each port. 
Although these voltages must be 



strictly limited to five volts max- 
imum, the computer will digitize 
the input with a resolution of six 
binary bits or 78 millivolts, which 
is adequate for many applications. 
Another use for these voltage ports 
could be to sense mechanical posi- 
tions, if suitable potentiometers are 
attached to the moving machinery 
and powered from pins 5 and 3 of 
the port. 



Piintei Port — One RS-232 output 
line, two RS-232 input lines and 
ground. The input lines will "read" 
digital signals, but the output line 
will swing nearly 24 volts peak-to- 
peak, and would require an external 
current-limiting resistor and diode 
clamping if it were used to drive 
something such as CMOS logic. 
This last experiment should not be 
undertaken without a thorough 
understanding of circuit design 
techniques and the limitations of 
the IC's used, both inside the Color 
Computer and in the external 
circuitry. 



Cassette Recorder Port — In 
general, only low- level audio sig- 
nals can be handled at this port, but 
you may be able to think of some way 
to apply such signals. In addition, 
an isolated relay closure is available 
for external on-off functions. For 
the safety of the computer, it would 
be best to limit this application to 
circuitry requiring not more than 
100 mA of DC current. 

(Continued) 
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Figure 2: Connections for single EPROM in Program Pack. 
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*If All (pin 30) is used, Block 1 = $C0O0-$C7FF and Block 2 ■ $C800- 
SCFFF. If A12 (pin 31) is used, Block 1 = $C000-$CFFF and Block 2 • 
$DOOO-$DFFF. 

Figure 3: Schematic of address decoding required to support two EPROMs 
In one Program Pack. 



Commercial Expansion Hardware 
and Software 



So far, only a limited amount of ex- 
pansion hardware has been announced, 
with much of it being related to floppy 
disk and memory expansion. It is possi- 
ble to expand the Color Computer to 
32K internally, using suggestions from 
reference 1. However, this will invali- 
date your warranty, so plan accordingly. 
The following items are currently 
advertised in various home computer 
journals, and a list of addresses for the 
manufacturers is provided at the end of 
this article. 



EXATRON: Plug-in cartridge containing 
32K of dynamic read/write memory 
and provision to accept a plug-in 
disk controller. ROM-based soft- 
ware furnished to drive either con- 
figuration. 

The MICRO WORKS: Memory expan- 
sion to both 16K and 32K internal 
and a serial-to-parallel adapter to 
drive serial printers. Assembly- 
language monitor, Disassembler, 
and software described as a software 
development system — assembler, 
editor and monitor in one package. 

TALLGRASS: Double-density floppy 
disk controller, 64K internal mem- 
ory expansion, ROM-based disk 
driver + monitor. 



SPECTRAL ASSOCIATES: EPROM 
Programmer, Editor/ Assembler, 
Monitor, Disassembler, games. 

NELSON SOFTWARE: Memory con- 
version kits, Word processor soft- 
ware, games. 

SSM, Inc,: Disassembler, Games, soft- 
ware keyboard expansion. 



f-^tSL 



29 
J => ML 

r 2 — s DECODE 



19 



18 



21 




20 



fol 



DATASOFT, Inc.: Monitor, Assembler, 
Disassembler, Debugger, Editor. 



Vendor Addresses 

Datasoft, Inc. 

16606 Schoenbom St. 

Sepulveda, CA 92343 

Exatron 

181 Commercial St. 

Sunnyvale, CA 94086 

The MICRO WORKS 
P.O. Box 1110 
Del Mar, CA 92014 

Nelson Software Systems, Inc. 
P.O. Box 19096 
Minneapolis, MN 55409 

Spectral Associates 
141 Harvard Ave. 
Tacoma, WA 98466 

SSM Soft Sector Marketing, Inc. 
6250 Middlebelt 
Garden City, MI 48135 

Tallgrass Technologies Corp. 
9009 W. 95th St. 
Overland Park, KS 66212 

Reference 

1. "What's Inside Radio Shack's Color 
Computer?," BYTE, March 1981, 
p. 90. 
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Figure 4: Address and enable connections required for a single 2732 
In a Program Pack. 
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OSI 



TRS-80 



COLOR-80 



OSI 



GALAXIAN - 4K - One of the fastest and finest 
arcade games ever written for the OSI, this one 
features rows of hard-hitting evasive dogfighting 
aliens thirsty for your blood. For those who 
loved (and tired of) Alien Invaders. Specify 
system - A bargain at $9.95 OSI 



LABYRINTH - 8K - This has a display back- 
ground similar to MINOS as the action takes 
place in a realistic maze seen from ground level. 
This is, however, a real time monster hunt as you 
track down and shoot mobile monsters on foot. 
Checking out and testing this one was the most 
fun I've had in yearsl - $13.95. OSI 



THE AARDVARK JOURNAL 
FOR OSI USERS - This is a bi-monthly 
tutorial journal running only articles about OSI 
systems. Every issue contains programs custom- 
ized for OSI, tutorials on how to use and modify 
the system, and reviews of OSI related products. 
In the last two years we have run articles like 
these I 

1) A tutorial on Machine Code for BASIC 
programmers. 

2) Complete listings of two word processors 
for BASIC IN ROM machines. 

3) Moving the Directory off track 12. 

4) Listings for 20 game programs for the OSI. 

5) How to write high speed BASIC — and 
lots more - 

Vol. 1 (1980) 6 back issues - $9.00 

Vol. 2 (1981) 4 back issues and subscription for 

2 additional issues - $9.00. 

ADVENTURES!!! 

For OSI, TRS-80, and COLOR-80. These 
Adventures are written in BASIC, are full fea- 
tured, fast action, full plotted adventures that 
take 30-50 hours to play. (Adventures are inter- 
active fantasies. It's like reading a book except 
that you are the main character as you give the 
computer commands like "Look in the Coffin" 
and "Light the torch".) 

Adventures require 8K on an OSI and 16K on 
COLOR-80 and TRS-80. They sell for $14.95 
each. 

ESCAPE FROM MARS (by Rodger Olsen) 
This ADVENTURE takes place on the RED 
PLANT. You'll have to explore a Martian city 
and deal with possibly hostile aliens to survive 
this one. A good first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVENTURE. It 
is a treasure hunt in a pyramid full of problems. 
Exciting and tough! 

TREK ADVENTURE (by Bob Retelle) 
This one takes place aboard a familiar starship. 
The crew has left for good reasons - but they for- 
got to takeyou. and now you are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 
Our first and original ADVENTURE, this one 
takes place aboard a cruise ship - but it ain't the 
Love Boat. 

VAMPIRE CASTLE (by Mike Bassman) 
This is a contest between you and old Drac - 
and it's getting a little dark outside. $14.95 each. 



OSI NEW-NEW-NEW OSI 

TINY COMPILER 

The easy way to speed in your programs. The 
tiny compiler lets you write and debug your pro- 
gram in Basic and then automatically compiles a 
Machine Code version that runs from 50-150 
times faster. The tiny compiler generates relocat- 
able, native, transportable machine code that can 
be run on any 6502 system. 

It does have some limitations. It is memory 
hungry — 8K is the minimum sized system that 
can run the Compiler. It also handles only a 
limited subset of Basic - about 20 keywords in- 
cluding FOR, NEXT, IF THEN, GOSUB, GOTO, 
RETURN, END, STOP. USR(X), PEEK. POKE, 
-,",*,/, ,S.\ , Variable names A-Z, and Integer 
Numbers from 0-64K. 

TINY COMPILER is written in Basic. It can 
be modified and augmented by the user. It comes 
with a 20 page manual. 
TINY COMPILER - $19.95 on tape or disk OSI 

SUPERDISK II 

This disk contains a new BEXEC' that boots 
up with a numbered directory and which allows 
creation, deletion and renaming of files without 
calling other programs. It also contains a slight 
modification to BASIC to allow 14 character 
file names. 

The disk contains a disk manager that con- 
tains a disk packer, a hex/dec calculator and 
several other utilities. 

It also has a full screen editor (in machine 
code on C2P/C4)) that makes corrections a snap. 
We'll also toss in renumbering and program 
search programs — and sell the whole thing for — 
SUPERDISK II $29.95 1634") OSI 

BARE BOARDS FOR OSI C1P 

MEMORY BOARDS!! ! - for the C1P - and they 
contain parallel ports! 

Aardvarks new memory board supports 8K 
of 2114's and has provision for a PIA to give a 
parallel ports! It sells as a bare board for $29.95. 
When assembled, the board plugs into the expan- 
sion connector on the 600 board. Available now! 

PROM BURNER FOR THE C1P - Burns single 
supply 2716's. Bare board - $24.95. 

MOTHER 80ARD - Expand your expansion 
connector from one to five connectors or use it 
to adapt our C1P boards to your C4/8P. - $14.95. 

16K RAM BOARD FOR C1P - This one does 
not have a parallel port, but it does support 16K 
of 21 14's. Bare Board $39.95. 




WORD PROCESSING THE EASY WAY- 
WITHMAXI-PROS 

This is a line-oriented word processor de- 
signed for the office that doesn't want to send 
every new girl out for training in how to type a 
letter. 

It has automatic right and left margin justi- 
fication and lets you vary the width and margins 
during printing. It has automatic pagination and 
automatic page numbering. It will print any text 
single, double or triple spaced and has text cen- 
tering commands. It will make any number of 
multiple copies or chain files together to print an 
entire disk of data at one time. 

MAXI-PROS has both global and line edit 
capability and the polled keyboard versions 
contain a corrected keyboard routine that make 
the OSI keyboard decode as a standard type- 
writer keyboard. 

MAXI-PROS also has sophisticated file 
capabibilities. It can access a file for names and 
addresses, stop for inputs, and print form letters. 
It has file merging capabilities so that it can store 
and combine paragraphs and pages in any order. 

Best of all, it is in BASIC (0S65D 51/4" or 
8" disk) so that it can be easily adapted to any 
printer or printing job and so that it can be sold 
for a measly price. 
MAXI-PROS - $39.95. Specify 5'/. or 8" disk. 

SUPPORT ROMS FOR BASIC IN ROM MA- 
CHINES - C1S/C2S. This ROM adds line edit 
functions, software selectable scroll windows, 
bell support, choice of OSI or standard keyboard 
routines, two callable screen clears, and software 
support for 32-64 characters per line video. 
Has one character command to switch mode! 
2 C1P from 24 to 48 character line. When in- 
stalled in C2 or C4 (C2S) requires installation 
of additional chip. C1P requires only a jumper 
change. - $39.95 

C1E/C2E similar to above but with extended 
machine code monitor. — $59.95 OSI 



ARCADE GAMES FOR OSI, COLOR-80 AND 
TRS-80 (8K OSI. 16K TRS-80 AND COLOR-80) 

TIMETREK - A REAL TIME, REAL GRAPHICS 
STARTRECK. See your torpedoes hit and watch 
your instruments work in real time. No more un- 
realistic scrolling displays! $14.95. 

STAR FIGHTER - This one man space war game 
pits you against spacecruisers, battlewagons, and 
one man fighters, you have the view from your 
cockpit window, a real time working instrument 
panel, and your wits. Another real time goody. 
$9.95 

BATTLEFLEET - This grown up version of Bat- 
tleship is the toughest thinking game available on 
OSI or 80 computers. There is no luck involved 
as you seek out the computers hidden fleet. A 
topographical toughie. $9.95 

QUEST - A NEW IDEA IN ADVENTURE 
GAMES! Different from all the others. Quest is 
played on a computer generated mape of Alesia. 
Your job is to gather men and supplies by comb- 
bat, bargaining, exploration of ruins and temples 
and outright banditry. When your force is strong 
enough, you attack the Citadel of Moorlock in a 
life or death battle to the finish. Playable in 2 to 
5 hours, this one is different every time. 
16K COLOR-80 OR TRS-80 ONLY. $14.95 




OSI 



Please specify system on all orders 

This is only a partial listing of what we have to offer. We offer over 120 games, ROMS, and data sheets for OSI systems 
and many games and utilities for COLOR-80 and TRS-80. Send $1.00 for our catalog. 

AARDVARK TECHNICAL SERVICES, LTD. 

2352 S. Commerce, Walled Lake, Ml 48088 

(313)669-3110 




COLOR-80 
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You don't have to be a 
genius to figure out 
that the lowest prices 
on computers and 
peripherals are at 
The Place Where 
You Co To Buy 
Computers, inc." 




mappkz computer 

^W Authorized Dealer 




zzmzzzz ?:' ''': ~ ~: :rr ~-~~~'~-~~-— 




APPLE II PLUS 


APPLE WRITER 


EPSON 


APPLE III 


GRAPHICS TABLET 


AMDEX 


DOS 3.3 


PEACHTREE 


ZENITH 


APPLE PLOT 


DC HAYES ASSOC. 


THE SOURCE 


APPLE PASCAL 


NEC 


VISICALC 


APPLE FORTRAN 


MICROSOFT 


VISITREND 



■■ 



OTY. 



AUTHORIZED DEALER AND SERVICE CENTER 
■ ■■■■■■■■■■■■■ 

MAIL ORDER SPECIALS 

DESCRIPTION TOTAL 



_ EPSON MX 80 $444.99 

_ EPSON MX80F/T $574.95 

EPSON MX 100 F/T $724.95 

_ EPSON INTERFACE $ 79.99 

_ NUMERIC 24 KEY MULTIFUNCTION PAD $139.95 

_ NEC GREEN MONITOR 12" $219.95 

_ AMDEX COLOR MONITOR 13" $349.99 

_ ZENITH GREEN SCREEN 12" $124.95 

_ COOL STACK W/FAN $ 59.95 

_ COOL STACK WITHOUT FAN S 32.95 

_ MICROSOFT RAM CARD $159.95 

_ MICROSOFT Z-80 CARD $284.99 

_ GRAPPLER INTERFACE $159.99 

_ GRAFTRAX 80 $ 89.99 

_ SUP "R" TERM $319.95 

VIDEX $279.95 

_ .Apple eAder™ $ 29.95 

Sub-Total 

Calif. Residents Add 8% Sales Ta> 

Add 4% lor shipping & handling TOTAL 



TO ORDER CALL 

(213) 78-THINK 



Name 

Address 

City. State. Zip, 
Phone 



Credit Card # 

o VISA d MASTERCARD Exp. Date_ 
Signature 



Just in Time For Christmas!! 

cApple dlder™ 

Apple Sider Is the only device thast makes the 
outside of your apple as useful as the Inside. 

This versatile little unit, which plugs into the game 
I/O and attaches to the side of your APPLE allows you 
to operate in one of two modes. The first mode enables 
you to easily select between one of two devices that 
plugs into your computer (for example joysticks and 
paddles). You will never have to open your APPLE 
again to change game devices. The second mode 
enables you to take advantage of your APPLE'S ability 
to handle up to four game controllers at one time. In 
either mode cApple eAder'" can be configured to meet 
you r specific needs, such as exchanging the X for the Y 
axis or changing push button numbers. 

cApple eAder™ makes a great stocking stuffer, and is 
available exclusively from, "THE PLACE WHERE YOU 
CO TO BUY COMPUTERS, INC." 



ORDER NOW 



$ 



Only 



29 



95 



C the place where you go to buy a^ia^tea. 
omputersp] 

™ incorporated l__J 

"the complete communications and computer store" 

5848 Sepulveda Blvd., Van Nuys, CA 91 41 1 
(213) 78-THINK 

APPLE II, APPLE III, APPLE WRITER, APPLE PLOT, APPLE PASCAL & APPLE 
FORTRAN ARE ALL REGISTERED TRADEMARKS OF APPLE COMPUTER INC. 
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Sweet- 16 Revisited 



The Apple Ms Integer BASIC 
ROM supports a powerful and 
seldom used pseudo machine 
known as Sweet-16. In this 
article, the Sweet-16 instruction 
set is described and 
programming hints, using a 
macro-assembler, are presented. 
Ways to use Sweet-16 on an 
Apple II Plus are also discussed. 



Charles F. Taylor, Jr. 
587F Sampson Lane 
Monterey, California 93940 



Steve Wozniak had a great idea in 
Sweet-16. Manipulating 16-bit quan- 
tities on an 8-bit 6502 in assembly 
language is inherently tedious. The 
Sweet-16 interpreter is a solution to 
that problem. It presents, to the pro- 
grammer, a virtual 16-bit machine with 
a convenient set of instructions and 
sixteen 16-bit registers. The program- 
mer using Sweet-16 can thus pretend 
that he or she is programming a 16-bit 
computer! The interpreter performs the 
necessary translations. 

It appears that Sweet-16 has never 
really caught on. I base this statement 
on the general absence I've noticed, of 
non-trivial Sweet-16 programs in the 
popular microcomputer magazines. Per- 
haps the problem is that Sweet-16 code 
is relatively slow (up to ten times 
slower than the equivalent 6502 code, 
according to Wozniak) . For many appli- 
cations, the loss of speed would be 
unimportant, particularly if the pro- 
grammer jumps in and out of Sweet-16, 
using Sweet-16 code only for 16-bit 
operations. 



I suggest that there are several 
other, more significant reasons why 
Sweet-16 hasn't caught on. 

1. The lack of readily available docu- 
mentation; 

2. The inconvenience of hand-assem- 
bling Sweet-16 code; and 

3. The fact that the Sweet-16 inter- 
preter is not supplied with the Apple 

II Plus (as it resided, along with the 
miniassembler, in the Integer 
BASIC ROM of the Apple II). 

Richard C. Vile, Jr., in his article 
"Sweet-16 Programming Using 
Macros" (MICRO 20:25), made a 
significant contribution by showing 
how the use of macros (with an ap- 
propriate macroassembler) can totally 
eliminate the inconvenience of hand 
assembly when using Sweet-16. For 
those readers unfamiliar with the sub- 
ject, macros in assembly languages are 
a bit like abbreviations in ordinary 
language. The meaning of the macro (a 
series of instructions or an arbitrary 
sequence of bytes) is defined at the 
beginning of a program and associated 
with an identifier. Then, during 
assembly, the macroassembler substi- 
tutes the expanded meaning of the 
macro wherever the associated iden- 
tifier occurs in the source code. Vile 
used this procedure to permit Sweet-16 
programming using a set of mnemonics 
rather than raw op-codes. 

Scope of this Article 

In this article I propose to do the 
following: 

1. Add to the store of Sweet-16 
documentation, correcting some 
earlier errors in the process; 

2. Provide a corrected set of macros; 



3. Illustrate the use of Sweet-16 with a 
non-trivial programming example 
("Quicksort"); 

4. Show how Apple II Plus owners can 
use Sweet-16; 

5. Show how to use the power of a 
macroassembler more fully to 
decode the Sweet-16 mnemonics, 
thus producing a program which ex- 
ecutes considerably faster. 



Sweet-16 Described 

The Sweet-16 virtual machine con- 
sists of sixteen 16-bit registers, R0-R15. 
These are implemented in the first 32 
bytes of page zero (locations $00-$lF). 
Page zero was chosen to take advantage 
of the 6502' s zero page addressing 
modes, and the greater speed of zero 
page operations. R0 is at locations 
$00-$01, R2 at $02-$03, and so on. The 
virtual machine architecture is illus- 
trated in figure 1. All data in the 
registers is stored low byte first; i.e., 
R0L (the low-order byte of R0) is at 
location $00, and R0H (the high-order 
byte) is at location $01. This permits 
the contents of any register to be 
treated as an address, consistent with 
the usual 6502 storage convention. All 
arithmetic operations are implemented 
with this in mind. 

Several registers have special func- 
tions. R0 serves as a 16-bit ac- 
cumulator. R15 serves as the program 
counter for the Sweet-16 interpreter. 
R12 serves as a stack pointer for 
Sweet-16 subroutine calls. R13 serves 
as a result register for the CPR (com- 
pare) instruction. The high-order byte 
of R14 (R14H) is used as a status 
register to point to the last register 
affected, and to store the carry bit for 
use by conditional branching instruc- 
tions. Rl through Rll are general- 
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Figure 1: Sweet-16 Architecture 
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purpose registers and may be used for 
holding data, addresses, or user-defined 
stack pointers. 

Sweet-16 has three basic addressing 
modes: immediate, register direct, and 
register indirect. There is only one in- 
struction which uses the immediate 
mode: the SETR instruction. SETR (2 
$1234), for example, stores the quanti- 
ty $1234 in R2. The register direct in- 
structions each specify a register as the 
operand, and act upon that register and 
possibly also upon the accumulator 
(RO). Examples are LD (3), which takes 
the contents of R3 and loads them into 
the accumulator, and ST (3), which 
does precisely the opposite. The arith- 
metic instructions are also register 
direct. ADD (4), for example, adds the 
contents of R4 to the contents of RO and 
leaves the result in RO. INCR (5) in- 
crements the contents of R5 by one. 

In register indirect addressing, the 
operand is not a register, but an address 
pointed to by a register. Before a mem- 
ory location can be accessed, its address 
must be loaded into a register. For ex- 
ample, the sequence of instructions 



SETR 
LD@ 



(2 SAA53) 
(2) 



would load the contents of memory 
location $AA53 into ROL (and would 
set ROH to 0). This is an example of an 
8-bit operation. The instructions 

SETR (2 $AA53) 
LDD@ (2) 



would load the contents of memory 
locations $AA53 and $AA54 into RO. 
This is, of course, a 16-bit operation. 

A distinctive characteristic of these 
register indirect instructions is that 
they provide automatic incrementing 
of the register containing the address. 
After the LD@ (2) instruction, for ex- 
ample, the contents of R2 will be 
$AA54, the address of the next 8-bit 
quantity. After the LDD@ (2) instruc- 
tion, the contents of R2 will be $AA55, 
the address of the next 16-bit quantity. 
This auto-increment feature is usually 
convenient, especially since many oper- 
ations involve sequential memory ac- 
cesses. Figure 2 illustrates the effects of 
these instructions. 



The Sweet-16 branching instruc- 
tions are conventional except that all 
branches, including the unconditional 
branch and the subroutine call, are 
relative. Although this restricts the 
range of branches to between - 128 and 
+ 127 bytes, it is not a serious restric- 
tion because Sweet-16 code is so dense. 
In any case, an absolute jump can be 
simulated by storing the destination 
address (less one) in the program 
counter (R15). (It is necessary to sub- 
tract one from the destination address 
because Sweet-16, like the 6502, in- 
crements the program counter before 
fetching the next op-code.) 

The Sweet-16 instruction set makes 
it easy to implement stacks. In fact, 
three different kinds of stacks are 



directly supported, and any register can 
be used as a stack pointer (although I 
wouldn't try R14 or R15!). The three 
types of stacks are as follows: 

1. An 8-bit stack which grows upward 
in memory, which I will call "type 
1." The sequence 

ST@ (Rn) 
POP® (Rn) 

alternately pushes the contents of 
ROL onto the stack pointed to by Rn 
and pops the value from the top of 
the stack to ROL (setting ROH to 0). 
The stack pointer is alwavs left 
pointing to the next available (va- 
cant) stack location. Figure 3 il- 
lustrates these actions. 

2. A 16-bit stack which grows upward, 
which I will call type 2. Its opera- 
tion is illustrated by example in 
figure 4. Note that its pointer, like 
that of the type 1 stack, is always 
left pointing to the next available 
stack location. 

3. An 8-bit stack which grows down- 
ward in memory, which I will call 
type 3. Its operation is illustrated by 
example in figure 5. Note that, in 
contrast to the other two types, the 
type 3 stack pointer is always left 
pointing to the "top" element of the 
stack, not the next available location. 

The Sweet-16 instruction set is 
summarized in table 1 . Parentheses are 
used around each operand because they 
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Figure 3: Stack Operations (Type 1) 
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are required by the syntax of the macro- 
assembler. Parentheses in the "effects" 
column are used to represent indirect 
addressing. The symbol ": = " is used 
to mean "is replaced by." The symbol 
"Rn" is used to represent any register, 
R0-R15. The expression "ROL : = (Rn]" 
thus means that the contents of the 
memory location pointed to by Rn is 
loaded into ROL, the low-order byte of 
the accumulator. Each entry in the 
table has been verified by stepping 
through the code. 

Sweet-16 Macros 

Suppose that we want to, as 
discussed before, load the contents of 
locations $AA53 and SAA54 into the 
Sweet-16 accumulator. By consulting 
table 1, we see that the proper sequence 
of bytes to accomplish this is 

12 53 AA62. 

The "12" is the op-code for SETR when 
the affected register is R2, the "53 AA" 
is the address in low-high format, and 
the "62" is the op-code for the LDD@ 
instruction when the register affected 
is R2. The Sweet-16 macros allow us to 
write instead 



SETR 
LDD(S 



(2 $AA53) 
(2). 



The macroassembler then takes 
care of substituting the appropriate 
Sweet-16 machine code for the 
mnemonics. This certainly makes life 
simpler! The savings are even greater 
for the relative branch instructions, 
because the macroassembler can take 
care of computing the relative displace- 
ment from the addresses. 

(Because I use the ASSM/TED 
Macroassembler from Eastern House 
Software, I will use its mnemonics in 
the following discussion.) 

There was, unfortunately, one 
serious error in the previously published 
set of Sweet-16 macros. The RELBR 
(relative branch) defined there does not 
compute relative displacements cor- 
rectly for forward branches. Condi- 
tional assembly was used to compute 
displacements separately for reverse 
and forward branches. The displace- 
ment for reverse branches was given as 
"LOC- = -l", which is correct. 
"LOC ' is a parameter of the macro and 
is the destination address. The " = " 
stands for the current location. The 
displacement given for forward branches 
was "= -LOC + 1", which cannot be 
correct because it is a negative quanti- 
ty. The correct forward displacement is 
"LOC - = - 1", which is the same ex- 
pression as that for reverse branches. 



Conditional assembly is, therefore, not 
needed. The correct version of the 
macro is as follows: 

!!!RELBR .MD (LOC) 

.BY LOC- = -1 
.ME 

That this is the correct computation for 
both forward and reverse branches can 
be verified by stepping through the 
code. You should note that, at the time 
of the branch, the program counter is 
pointing at the displacement byte. Fol- 
lowing the branch, the program 
counter should point to one byte before 
the destination address. 

One other macro in the set needs to 
be modified slightly. The "BRK" 
macro is assembled to op-code "00" 
(the 6502 BRK op-code, but the 
Sweet-16 RTN op-code). This is easily 
fixed by changing the mnemonic to 
"BK" to avoid confusion with the 6502 
mnemonic. 

The corrected set of Sweet-16 
macros is shown in listing 1, at the 
beginning of the demonstration pro- 
gram, which will be discussed soon. 
The reason that the "@SW16" macro 
shows address "$7689" rather than 
"$F689" will be explained later in the 
article. 

Sweet-16 Demonstration Program 

In selecting a demonstration pro- 
gram, I wanted to choose a program 
that demonstrates some of the charac- 
teristic features of Sweet-16, and at the 
same time, is perhaps useful. The 
Quicksort algorithm, invented by the 
eminent British computer scientist 
C.A.R. Hoare, seemed an ideal choice. 

Quicksort is usually implemented 
in a language such as Pascal, using 
recursion. Unfortunately, recursion is 
not available to us in low-level lan- 
guages such as 6502 assembly language 
or Sweet-16, so we must simulate it. 
The simulation of recursion in this case 
requires a 16-bit stack. The algorithm 
also requires numerous 16-bit com- 
parisons and data manipulations. As 
Sweet-16 makes the implementation of 
all of these operations easy, it is a good 
choice for this application. 

The specific problem to be solved is 
to sort a list of 16-bit addresses into 
ascending order. Briefly, here is how 
the program works: suppose the first 
element in the list is located at address 
L and the last element at address R. We 
choose an element from the list, say 
the element located at address (L + 
R)/2, and call its value X. Starting from 
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Interesting Software 

OSI ................. presents OSI 



All machine code and fast! Our finest arcade 
game. Where it's you against the mean, 
menacing worm! 
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$29.95 



The most extensive D&D f adventure/fantasy for the 
OSI! You must traverse through the evil land of 
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way! Your goal is to search out a certain treasure 
that will allow you to free the land from the evil Demi 
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graphics. 
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15856 Ocean Avenue 
Whittier, CA 90604 
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Why you need The Inspector. 



If you're serious about programming, you need 
to set all your utilities together in one place — 
inside your Apple. The Inspector comes on an 
Eprom that simply plugs into the D8 socket, or on 
a disk ready to merge with Integer Basic for 
automatic loading on boot. Either way, it stays at 
your fingertips, ready to call without disturbing 
your current program. 

The Inspector puts you in total control of both 
memory and disks. You can search forward 
and backwards, edit, read nibbles, 
map disk space, dump the screen 
to a printer, examine every secret 
of your Apple. Use The Inspector 
to repair blown disks, undelete 
files, input "illegal" commands, 




read and alter files, locate strings in memory or on 
disk. The uses are endless. The manual, alone, is an 
education. And it's always there when you need it. 

You need the most powerful disk and memory 
utility available for your Apple. You need the 
Inspector. 

See your local dealer, or order direct for just 
$49.95. Mastercard and Visa holders order 
toll-free, 1-800-835-2246. 

OAAEGA MJCROWARE.INC 

222 SO. RIVERSIDE PLAZA 

CHICAGO, IL 60606 

312-648-1944 
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Figure 4: Stack Operations (Type 2) 
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Figure 5: Stack Operations (Type 3) 
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L and moving toward the center of the 
list, we look for an element which has 
value greater than or equal to X. Then 
we start from R and move toward the 
center of the list until we find an ele- 
ment with value less than or equal to 
X. These two elements are then ex- 
changed. We then continue moving 
toward the center from both sides, ex- 
changing elements to the left of X that 
are greater than or equal to X, with 
elements to the right of X that are less 
than or equal to X. 



When our paths cross, the list is 
said to have been partitioned about X. 
Note that X itself can be moved. When 
the partition is complete, all values to 
the left of X will be less than or equal to 
X, and all values to the right of X will 
be greater than or equal to X. In addi- 
tion, X will have migrated to its proper 
position in the list and need not be con- 
sidered further. We thus have two sub- 
lists to be sorted. 

As we can consider only one list at a 
time, we put the right-hand sublist 
aside for later consideration. We do this 
by pushing its boundaries onto the 



stack. The left-hand sublist is then par- 
titioned in the same manner as the 
original list. Eventually the sublist be- 
ing partitioned will be so short that it is 
trivially sorted. Then we pull the ad- 
dresses of another sublist from the 
stack and continue to partition it until 
it too is sorted. If we repeat this process 
until the stack is empty, the result is a 
sorted list. 



Quicksort is, on the average, one of 
the fastest sorting algorithms known. 
The number of operations (com- 
parisons and exchanges) required to 
sort a list of N elements is of the order 
of N times the base 2 logarithm of N. 
Compare this to the ubiquitous Bubble- 
sort, which requires an average of 
N-squarcd operations. The advantage of 
Quicksort thus increases rapidly with 
the size of the list to be sorted. 

The program is shown in listing 1. 
It may appear to be quite long, but 
remember that the macros only have to 
be entered into your system once; you 
may use them for as many programs as 
you like without reentering them. Ex- 
cluding the macros, comments, and 



assembler directive, the program is im- 
plemented in 74 lines of code. An 
equivalent, non-recursive, implemen- 
tation in Pascal took 38 lines. I leave to 
your imagination the number of lines it 
would take in 6502 assembly code! 



The program was tested on 
randomly-ordered lists of length 256 
bytes (128 addresses) and 4096 bytes 
(2048 addresses). Using a stopwatch, 
the shorter list took 2.0 seconds, and 
the longer list 35.5 seconds. 

A few comments are in order. If the 
sort routine is to be used by a larger pro- 
gram, parameters (L, R, and the loca- 
tion of the user stack) can be passed by 
way of page zero. You can actually 
place them into the appropriate 
Sweet- 16 register from the main pro- 
gram. Another point is that the pro- 
gram, as written, will only work for 
lists residing in memory locations 
below $8000. This is because the 
algorithm used to calculate the middle 
element of the list is (L + R)/2, and the 
addition will overflow if L + R exceeds 
SFFFF. The solution to this problem is 
to use the fact that L + (R - L)/2 will 



No. 44 -January 1982 



MICRO - The 6502/6809 Journal 



29 



Table 1: Sweet- 16 Instruction Set 

Op- 
Code Mnemonic Operand 



00 
01 
02 
03 
04 
05 
0£ 
07 
08 
09 
00 
0B 
0C 
0D 
0E 
0F 
In 
2n 
3n 
An 
5n 
Bn 

7n 



aswie 

RTN 

BR 

BNC 

BC 

BP 

BM 

BZ 

BNZ 

BM1 

BNM1 

BK 

RB 

BB 



SETR 

LD 

BT 

LD3 

ST3 

LDD3 

STD3 



(addr) 
(addr) 
l addr) 
(addr) 
(addr) 
(addr) 
(addr) 
(addr) 
(addr) 



(addr) 



(Rn Constant) 

(Rn) 

(Rn) 

(Rn) 

(Rn) 

(Rn) 

(Rn) 



Bn 


POPS 


(Rn) 


Bn 


STP3 


(Rn) 


fin 


ADD 


(Rn) 


Bn 


SUB 


(Rn) 


Cn 


P0PD3 


(Rn) 


Dn 


CPR 


(Rn) 


En 


INCR 


(Rn) 


Fn 


DECR 


(Rn) 



Effect 

Enter SWEETIE 

Return to calling 6502 program 

Unconditional branch 

Branch if No Carry 

Branch if Carry flag set 

Branch if prior result Plus 

Branch if prior result Minus 

Branch if prior result Zero 

Branch if prior result Not Zero 

Branch if prior result is -1 

Branch if prior result is not -1 

Execute E502 BRK Instruction 

Return from SWEETIE subroutine 

Branch to SWEET16 subroutine 

Unass i sned 

Unass i sned 

Unass i sned 

Rn := Constant 

R0 := Rn 

Rn := R0 

R0H 

(Rn) := RBLi Rn := Rn+1 

R0L := (Rn)i Rn := Hn+ii 

R0H := (Rn)i Rn := Rn+1 

(Rn) := R0Li Rn := Rn+1; 

(Rn) := R0H; Rn := Rn+1 

Rn := Rn-15 R0L := (Rn); R0H := 

Rn := Rn-l; (Rn) := R0L 

R0 

R0 

Rn 

Rn 



i= 0; H0L := (Rn); Rn := Rn+1 



:= R0L; Rn 
= (Rn); Rn 
= (Rn); Rn 
:= R0L; Rn 
:= R0H; Rn 
:= Rn-l; R0L 
:= Rn-l; (Rn) 
:= R0 + Rn 
:= R0 - Rn 
•■= Rn-l; R0H I 
:= Rn-l; R0L I 



= (Rn); 

= (Rn) 

R13 := R0 - Rn; Bet status register 
Rn := Rn+1 (16-bit increment) 
Rn := Rn-l (16-bit decrement) 



give the same result without overflow 
and to modify the program accordingly. 

Sweet-16 and the Apple n Plus 

When I got my Apple II Plus home 
from the dealer in February 1980, 1 was 
surprised to discover that the mini- 
assembler, the step and trace functions, 
and Sweet- 16 were not included. (The 
miniassembler and Sweet-16 resided in 
leftover space in the Integer BASIC 
ROM and step and trace were casualties 
of the Autostart ROM.) I soon 
discovered, however, that the source 
code for the miniassembler and 
Sweet-16 were in the "Red Book," the 
January 1978 edition of the Apple II 
Reference Manual, which was then pro- 
vided by Apple with its computers. The 
source code for Sweet-16 was also 
published by Steve Wozniak, the 
author, in the November 1977 issue of 
Byte. I therefore lost little time in 
relocating first the miniassembler and 
then Sweet-16 to RAM. I chose to put 
Sweet-16 at $7689 because I then had a 
32K cassette system. (That location 
also works for a 48K disk system.) The 
only tricky part of the relocation was 
the instruction at $F69E/$769E, which 
had to be changed from LDA #$F7 to 
LDA #$77. If you were going to relocate 



Sweet-16 to $9089, for example, this 
instruction would be changed to LDA 
#$91. This is the high-order byte used 
by an internal jump table. 

Listing 2 is a disassembled version 
of the relocated Sweet-16 interpreter 
that I use in my Apple II Plus. 

SPEED16 

Sweet-16 spends much of its time 
decoding instructions. Specifically, it 
maintains its own program counter (in 
R15), fetches op-codes, uses a jump 
table to decide which subroutines to 
call to execute the op-code, and keeps 
track of status. All of this takes time, 
and all of it is overhead. 

The Sweet-16 macros discussed 
above translate the mnemonics into 
Sweet-16 op-codes, which are then 
decoded by the Sweet-16 interpreter in- 
to the appropriate actions. By taking 
fuller advantage of the power of the 
macroassembler, we can eliminate the 
middleman and translate the mnemon- 
ics directly into the appropriate ac- 
tions. This completely eliminates the 
need for Sweet-16 to fetch and decode 
op-codes. In fact, it eliminates the need 
for op-codes! It also eliminates, as will 



be seen, the need for a separate program 
counter and subroutine return stack. 
With much of the overhead eliminated, 
the resulting program will run con- 
siderably faster. 

You may be wondering, "What's 
the catch?" The catch, if you want to 
call it that, is that the object code pro- 
duced will not be nearly as compact as 
Sweet-16 op-codes. This may or may 
not be a problem, depending on the 
application. 

All this is accomplished with a new 
set of macros which I have taken the 
liberty of calling "SPEED16". The 
mnemonics and their effects are the 
same as described in table 1 for 
Sweet-16, but the method of imple- 
mentation is quite different. Because 
the program counter and return stack 
have been eliminated, the uncondi- 
tional branch ("BR") and subroutine 
call ("BS") are implemented using ab- 
solute rather than relative addressing. 
For the same reason, R12 and R15 can 
be used as general purpose registers. 
The "@SW16" instruction serves the 
same purpose as before, but its im- 
plementation is greatly simplified; in 
SPEED 16 it merely has to call the 
monitor's routine for saving registers. 
Similarly, the "RTN" instruction 
merely calls the monitor's routine for 
restoring registers. 

The SPEED 16 macros are shown in 
listing 3 with the demonstration pro- 
gram. Only two minor changes were re- 
quired to the source instructions of the 
Quicksort routine. Both involved rela- 
tive branch instructions that had to be 
changed to absolute branches (because 
the SPEED 16 object code is not as com- 
pact) and both were flagged by the 
assembler. After these two changes 
were made, the program ran correctly. 
Note that the object code produced is to 
the left and below each mnemonic, and 
is considerably longer than that produced 
by the Sweet-16 macros. Again using a 
stopwatch, the progam ran in 1.0 
seconds for the 128 element sort and 
14.5 seconds for the 2048 element sort. 

Some of the SPEED 16 macros im- 
plement the desired actions directly, 
including SETR and all the branching 
instructions. Note that the conditional 
branching instructions must ascertain 
the status of the Sweet-16 machine via 
R14H and/or the register containing 
the last result. The remaining instruc- 
tions are implemented using calls to 
subroutines within the Sweet-16 inter- 
preter. Before these subroutines are 
called, two times the register number 
must be put in the X register and in 
R14H. For the CPR instruction, the Y 
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register must also contain two times 13 
(to indicate R13 as the result register). 
The op-code decoding function of the 
Sweet- 16 interpreter is thus completely 
bypassed. 



Conclusions 



Which set of macros should you 
choose? Using the Quicksort program 
for the 2048 item sort as a benchmark, 
some comparisons can be made. Using 
the Sweet- 16 macros, the program 
assembled in 101 bytes and ran in 35.5 
seconds. Using the SPEED16 macros, 
the program assembled in 586 bytes 
and ran in 14.5 seconds. It is, thus, a 
tradeoff of speed versus compactness. It 
should be pointed out, however, that a 
program can be run under either set of 
macros with little or no change so that 
you can use whichever set of macros 
suits your needs at the moment. 
Because the instruction set is virtually 



the same, there is no "learning curve" 
in switching from one to the other. 

Several other comments are in 
order. First, although the original 
Sweet- 16 has three unused op-codes 
(SOD, $0E, and $0F), extending the in- 
struction set would be relatively dif- 
ficult. Because the SPEED16 im- 
plementation uses no op-codes, exten- 
sion of its instruction set using macros 
is relatively trivial. An example of a 
desirable extension would be an in- 
struction to move the contents of one 
register to another without going 
through the accumulator. Or you 
might need to add a multiply instruc- 
tion. Sixteen-bit shift instructions 
would also be convenient. 

One cosmetic change that would 
simplify the use of either set of macros 
would be to add "aliases" to several in- 
structions. For example, the STD@ in- 
struction is sometimes used to push a 
16-bit quantity onto a stack. An appro- 
priate alias would be the macro 



!!!PUSHD@ 



,MD (REG) 
STD@ (REG) 
.ME 



For 16-bit processing on the 6502, it 
makes sense to use a virtual machine 
such as Sweet- 16 to simplify the pro- 
gramming effort. Hopefully this article 
will make the job easier, whether you 
choose to use the Sweet- 16 macros or 
the SPEED1 6 macros. 



Charles Taylor is a Lieutenant 
Commander in the U.S. Navy and is 
currently on the faculty of the Naval 
Postgraduate School, where he teaches 
courses in Operations Research, Statistics, 
and Computer Science. He became 
involved with computing in 1966, writing 
ALGOL programs for a Burroughs B5500. 
He has since worked on and off with 
computers ranging from the Apple II to the 
IBM 3033AP and with languages ranging 
from various assembly languages to Pascal, 
FORTRAN, C, PILOT, and APL. 



Listing 1 



! ! ! SETR 



! ! !LD 



;»:*** QUICKSORT **** 
;* * 

;* SWEET J 6 DEMO * 

; »• PROGRAM * 



s* 



BY * 

*. 
!* C. F. TAYLOR. JR. * 

-»: * 

;*■ APRIL 19S1 * 

;* * 

. BA SE000 

.OS 

; SWEET IE MACROS 

-.BY R. C. VILE, JR. 

•■MICRO 120:25) 

IMODIFIED BY 

;C. F. TAYLOR, JR. 

5APRIL 19S1 

.MD I. REG HDDR) 

.BY S10+REG 

. SE ADDR 

.ME 

.MD (REG) 

.BY S20+REG 

.ME 



I 1 1ST 


.MD 


(REG) 




.BY 


S30+REG 




.ME 




! ! ! LD3 


.MD 


(REG) 




.BY 


S40+REG 




.ME 




! ! ! ST3 


.MD 


(REG) 




.BY 


S50+REG 




.ME 




! ! ! LDD3 


.MD 


(REG) 




.BY 


SE0+REG 




.ME 




! ! ISTD3 


.MD 


(REG) 




. BY 


S70+REG 




.ME 




'. ! ! POPS 


.MD 


(REG) 



! ! ! STP3 
! ! ! ADD 
! ! I SUB 
! I ! P0PD3 
! ! !CPR 
! '. IINCR 
! ! ! DECR 
! ! ! RTN 
! ! ! RELBR 
! ! !BR 

I ! ! BNC 

I I I8C 



! ! IBP 



! ! !BM 



.BY SE0+REG 

.ME 

.MD (REG) 

. BY I90+REG 

.ME 

.MD (REG) 

.BY SA0+REG 

.ME 

.MD (REG) 

. BY SB0+REG 

.ME 

.MD (REG) 

.BY SC0+REG 

.ME 

.MD (REG) 

. BY SD0+REG 

.ME 

.MD (REG) 

. BY SE0+REG 

.ME 

.MD (REG) 

. BY SF0+REG 

.ME 

.MD 

. BY 00 

.ME 

.MD (LOO 

.BY LOC-=-l 

.ME 

.MD (WHERE) 

.BY 1 

RELBR (WHERE) 

.ME 

. MD (WHERE) 

.BY 2 

RELBR (WHERE) 

.ME 

. MD (WHERE) 

.BY 3 

RELBR (WHERE) 

.ME 

.MD (WHERE) 

.BY U 

RELBR (WHERE) 

.ME 

.MD (WHERE) 

.BY 5 

RELBR (WHERE) 

.ME 



'BZ 



! IBNZ 



! IBM1 



IBNM1 



!BK 



! IRS 



I IBS 



I3SW16 



.MD (WHERE) 

. BY E 

RELBR (WHERE) 

.ME 

.MD (WHERE) 

.BY 7 

RELBR (WHERE) 

.ME 

.MD (WHERE) 

.BY 8 

RELBR (WHERE) 

.ME 

.MD (WHERE) 

. BY 9 

RELBR (WHERE) 

.ME 

.MD 

.BY SA 

.ME 

.MD 

.BY SB 

.ME 

.MD (WHERE) 

.BY *C 

RELBR (WHERE) 

.ME 

.MD 

JSR S7G39 

.ME 



R0L 

R0H 

LI 

L2 

I 

J 

L 

R 

X 

AI 

MIDPT 

AJ 

R10 

SP 

INITIALIZE 



. DE S00 

.DE S01 

.DE S7500 

. DE 57t>Hb 

.DE 1 

. DE 2 

.DE 

.DE 

.DE 

.DE 

. DE 

.DE 

.DE 

.DE 



;SORT FROM 

; ru 



3 

5 

E 
7 

O 

10 
11 



. ES 
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MICRObits 



MICRO is increasing the cost of 
classified insertions (now called 
MICRObits) to $25.00 each, prepaid, 
beginning with the January '82 issue. 
However, MICRO subscribers can 
advertise in MICRObits, one time, at 
the old rate of $10.00. (One $10.00 ad 
per subscriber, subsequent ads $25.00.) 
To submit an ad to MICRObits, send 
typewritten copy to reach MICRO by 
the 20th of the second month before 
the issue you would like the ad to 
appear in (i.e., by January 20th for the 
March issue). 40- word text limit. Late 
ads held for next issue. Send to: 

MICRObits 

P.O. Box 6502 

Chelmsford, MA 01824 

Used Computer Exchange 

Save time, money and mistakes. List 
as Buyer/Seller — get pricing advice 
with names and phone numbers of 
those who meet your criteria on first 
call. Apples, PETs, Atari, OSI, 
printers, CRTs, etc. 600+ listed. 
Pay only for results. Call: 

(703) 471-0305 or 

(800) 336-3393 

Used Computer Exchange 

11484 Washington Plaza West 

Reston, VA 22090 

TRS-80 Color Computer Game 

Play "Brickaway" on any 
configuration of the Color 
Computer. A high-speed arcade game 
in 6809 machine language with 
realistic sound and brilliant colors. 
Only $7.00 postpaid. Requires 
joysticks, sold on cassette. 

Britt Monk, CDP 

P.O. Box 802 

Elyria, Ohio 44036 

KIM-1/OSIC1P Hardware 

General expansion board adds 
memory and ports. Construction 
manual — $10.00. Real-time clock 
manual describes hardware/software 
for interfacing through expansion 
board — $10.00. TimeStack 
operating system implements 
programmable controller using 
expansion board and real-time clock. 
Manual — $10.00. $1.00 for 
specifications/notes. 

Hunter Technical Services 

P.O. Box 359 

Elm Grove, WI 53122 



(Continued on page 101) 



Listing 1 (Continued) 

6000- 20 89 76 

6003- IB 
6006- 00 79 

6006- 1ft 

6007- 00 79 

6009- IB 
600ft- 00 75 

600C- 7B 

600D- 10 
500E- FE 75 

6010- 7B 



6011- CB 

6012- 34 

6013- CB 

6014- 33 

6015- 23 
6015- 31 

6017- 24 

6018- 32 

6019- A3 

601ft- 00 
601B- 46 01 
60 ID- 66 00 
60 IF- 09 FE 
6021- 25 00 
6023- 85 00 

6025- 20 89 76 

6028- 37 

6029- 67 
602ft- 35 



L0QP1 



L00P2 



L00P3 



LOOPu 



602B- 61 

602C- 36 

602D- D5 

602E- 02 
602F- FB 

6030- Fl 

6031- Fl 



3SW16 SCALL SWEET16 

BETR CSP S7900) ; STACK POINTER 

SETR (R10 *7900) SSAVE FOR LfiTER 

SETR CB LI) ; FIRST ADDR TO SORT 

STD3 CSP) ;PUSH 

SETR C0 L2) ;LAST fiDDR TO SORT 

STD3 CSP) ;PUSH 

;LOOPl IS THE 

! CONTROL LOOP AND 

: DEC IDES WHICH SUBLIST 

!T0 PARTITION NEXT 

P0PD3 CSP) ;GET BOUNDARIES 

ST CR) ;OF NEXT SUBLIST 

POPD3 CSP) ;T0 PARTITION 

ST CD 

;L00P2 DOES THE 

! ACTUAL PARTITIONING 

LD CD ;l := L 

ST CI) 

LD CR) 

ST CJ) 

ADD CD 

RTN 



LSR *R0H 
ROR *R0L 
LDA »«FE 
AND *R0L 
STA *R0L 
3SW16 

ST CMIDPT) 

LDD3 CMIDPT) 

ST CX) 

I 



;J := R 

!R0 := L+R 

;BACK TO 6502 

5DIVIDE BY 2 

5MASK ODD BIT 

;TO GET EVEN WORD BOUNDARY 
iBACK TO SWEETIE 

5SAVE RESULT 

I FETCH THAT ITEM 

JMIDDLE ELEMENT OF LIST 



LOOPS INTERCHANGES ELEMENTS 
TO ACCOMPLISH PARTITION 
ABOUT MI DPT C VALUE X) 



L00P4 FINDS AN ELEMENT 
TO LEFT OF MIDPT WITH 
VALUE > X 



LDD3 CI) ;ACI) 

ST CAI) ;SftVE 

CPR CX) JLOOP 

BNC CL00P4) ; UNTIL ACI)>=X 



DECR CI) 
DECR CI) 



JADJUST POINTER 
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SENSIBLE SOFTWARE. INC. is pleased to introduce. 
)f tw ar e/ OUR 1981 COLLECTION OF SUPERIOR SOFTWARE FOR THE APPLE COMPUTER... 

APPLESOFT-PLUS STRUCTURED BASIC [APLUS] SEB.OO 

32K+ . Disk II. ROM/RAM Applesoft. Apple ll/Apple II + 

APLUS is a 4K machine language utility that adds the lollowing structured programming commands to Applesoft basic: 1) WHEN.. ELSE.. FIN, 2) UNTIL. 3) 
WHILE 4) UNLESS. 5) CASE. 6) SELECT (variable), and 7) (OTHERWISE). Multi-line IF. .THEN statements are also supported. APLUS allows the use ot 
■named" subroutines or "procedures". The programmer can now instruct a program to "DO CURVE-FIT" without worrying about the location ot the 
subroutine APLUS automatically indents "&LIST"ed programs to clarity the logic tlow. The APLUS "&C0NVERT" command replaces the above structured 
programming commands with "G0T0"'s and "G0SUB'"s to provide a standard Applesott program as output. New programs can now be written using 
"G0T0"-less logic. 

APPLESOFT PROGRAM OPTIMIZER [AOPT] SSO.OO 

32+ , Disk II, ROM /RAM APPLESOFT, Apple ll/Apple II + 

AOPT is a 2.2K machine language utility that will substantially reduce the size ot an Applesott program without affecting the operation of trie program. AOPT 
automatically: t) Shortens variable names, 2) Removes remarks, 3) Removes unreferenced lines, 4) Appends short lines together, 5) Removes extra colons, 
and 6) Renumbers line numbers. AOPT will convert a verbose, well documented, developmenl version ot a program into a memory-efficient, more secure, pro- 
duction version of the same program. This is the ORIGINAL and the BEST optimizer on the software market today! 

DOS PLUS SE5.00 

32+. Disk II. DOS 3.3. Apple ll/Apple II + 

DOS PLUS is the software solution lor living with both 13-sector (DOS 3.1 . 3.2, and 3.2.1) and 16 sector (DOS 3.3) Apple diskettes, DOS PLUS adds 8 new 
commands to Apple DOS Three ot these are built-in and five are user definable. The built in commands include: 1) ".F" to "flip" between DOS 3.2 and 3.3 
(The user need not re-boot and any program that resides in memory will nol be affected by the tlip. The DOS version can even be changed within a program!), 2) 
" S" status command informs you what DOS version is currently active, and 3) ".B" BLOAD- analysis is also provided to inform the user of the starting ad- 
dress and length of the last accessed binary file. DOS PLUS also includes a DOS COMMAND CHANGER program to allow easy customization of Apple DOS com- 
mands to suit individual tastes. 

DISK ORGANIZER II —NEW— S3COO 

48K, Disk II, Apple ll/Apple II + 

DO II is the fastest and friendliest utility available today lor organizing files on an Apple II diskette. DO II provides the following functions: 1) TITLING in Nor- 
mal. Inverse. Flashing. Lower case, and other characters normally nol available, 2) CUSTOM REORDERING ot the directory, 3) ALPHABETIZING, 4) DYNAMIC 
DISPLAY ot ALL filenames on a diskette (including deleted files), 5) RENAMING files with the same character options as TITLING, 6) UNDELETING. 7) 
DELETING. 8) PURGING deleted files. 9) LOCKING (all or some), 10) UNLOCKING (all or some), 11) USE ot DOS sectors for increased data storage, and 12) a 
SIMULATED CATALOG to show the modified directory before it is written to the diskette. DO II is completely MENU DRIVEN and attains it's speed by altering a 
RAM version of the catalog. DO II uses a very powerful SMART KEY to automatically locate the next valid filename for any specified disk operation. Compatible 
with DOS 3 1 , 3.2. 3.2. 1 . and 3.3 as well as MUSE DOS to allow manipulation of SUPER TEXT files! (Note: Updates available for $5.00 and original diskette.) 

PASCAL LOWER CASE —NEW— SEB.OO 

48K+ , Disk II. Apple ll/Apple II + , Language System 

This is the most recent commercially available LOWER CASE MOD lor Pascal for the Apple II. It is the only currently available modification that is compatible 

with both versions of Pascal (1 and 1 . 1 ). The Pascal version is automatically checked prior to updating system Apple. If you have any of the hardware lower 

case adapters you can now input the lollowing characters directly from the keyboard: | "• N t J _ and \ . This modification does NOT interfere 

with any of the 'Control' character lunctions implemented by the Pascal environment and will 'undo' any alterations made by other commercially released 

modifications 

QUICKLOADER SES.OO 

48K + . Disk II. Apple II / Apple II + ... (2 Disks) 

II you find yoursell doing the same things over and over - OL will help you do it faster! QL is a unique disk that lets you load DOS, a language card (optionally), 
and an application program of your choice extremely rapidly. QL boots as a 13 or 16 sector diskette and is easy to set up and use. To change the setup, you 
merely load your Apple RAM with the new data and use the "RECONFIGURE" oplion of QL. The next time you boot your QL disk, it will quickly load your new 
setup (Lanquaqe Card DOS Application program) into your Apple! OL can reduce the time to perform these functions by up to 80%! Now thai you've read 
this you say "But I can already do all of that!" OL doesn't do anything new - it just does it MORE CONVENIENTLY and FASTER! Try it. you'll like it! 

DISK RECOVERY ["THE SCANNER"] S30.00 

48K + . Disk II, Apple ll/Apple II + 

This program is long overdue. You need no longer be concerned with the problem of physically damaged disks. Just as "Apple Pascal" provides a "BAD 
BLOCK SCAN' ' DISK RECOVERY will do a complete scan of your Apple diskettes' recording surface. Damaged areas will be "marked" as used in the disk 
directory so that no attempts will be made to "WRITE" to a bad sector. The VTOC will be completely redone to reflect both the bad sectors and actual disk 
usaqe A complete report is generated advising the user of all corrections. A resulting "DISK MAP" is presented for your review. The greatest advantage ot 
this program over the other versions is that it can be used on either NEWLY INITIALIZED DISKS or disks that ALREADY CONTAIN PROGRAMS as well as the 
SPEED ot analysis. THE SCANNER is fully compatible with both 13 and 16 sector diskettes. This is a must for all Disk II owners! 

ALSO AVAILABLE: SENSIBLE SOFTWARE, INC. 

SUPER DISK COPY III S30.00 6619 PERHAM DRIVE / W. BLOOMFIELD. MICHIGAN 48033 

MULTI-DISK CATALOG III SES.aO 313-399 8877 

™^^n ROTECT ° R SBS °-°° VISA and MASTERCARD WELCOME 

I IIMAQ LANDER II 816.00 Mrcmgan Readents add 4% Sales Tax 

■_i_ii«iMi-f u«i«utn ■■ ~ Mease a0fl y m pjyjg, & nanuung | 0r Hcr , item ordered. 

MASTER MAZE S1B.OO 
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LO0P5 FINDS AN ELEMENT 
TO RIGHT OF MIDPT WITH 
VALUE < X 



LQOP5 



6032- 

6033- 

6034- 

6035- 

6036- 

6037- 

6038- 
6039- 

603A- 

603B- 

603C- 
603D- 

603E- 

b0.il-- 

6060- 
6061- 



62 
F2 

F2 
38 
25 

D8 

03 

04 

F2 
F2 

01 

F4 
22 

Ul 

B2 

0E 



ENDLOOP5 



LDD3 CJ) 

DECR CJ) 

DECR CJ) 

ST CAJ) 

LD CX) 

CPR CAJ) 

BC <:ENDL00P5) 

DECR CJ) 
DECR CJ) 
BR CL00P5) 

LD CJ) 



;acj) 

; compensate 

;for auto-incr. 



;LOOP UNTIL 

;ACJ) <=x 



605C- 2fl 




CPR CSP) 


i STOCK EMPTY? 


605D- DB 




BC CEXIT) 


SYES 


605E- 03 
605F- 02 




BR CLOOP1) 


;no 


S060- 01 
6061- AF 


tXIT 


RTN 


:DONE 


6062- 00 

6063- 60 




RTS 

.EN 





CPR CI) 
BNC (ENDL00P3) 



i IF I)J 

;GOTO ENDLD0P3 



6062- 


25 


6063- 


72 


6064- 


F2 


6045- 


F2 


6066- 


F2 


6067- 


F2 


6066- 


28 


6049- 


71 ENDL00P3 


604A- 


22 


604B- 


Dl 



604C- 
604D- 


03 
DD 


604E- 


24 


604F- 


Dl 


6050- 
6051- 


02 
04 


6052- 


21 


6053- 


7B 


6054- 


24 


6055- 


7B 



LD CAI) 
STD3 CJ) 
DECR CJ) 
DECR CJ) 
DECR CJ) 
DECR CJ) 
LD CAJ) 
STD3 CI) 
LD CJ) 
CPR II) 
BC CLOOP3) 

: 

LD CR) 
CPR CI) 



iACI) 

! EXCHANGE AC I) 

SAND ACJ) 

iADJ POINTER TO 

;PREVIOUS ELEMENT 

iACJ) 

sfinish exchange 
;loop until 
;l ) J 



ilF I>=R THEN 



END IF 



BNC CENDIF) iGOTO ENDIF 

LD CI) SPUSH FOR LATER 

STD3 CSP) ! PARTITIONING 

LD CR) SCRIGHT PART OF LIST) 

STD3 CSP) ; 

LD CJ) ;PREPARE TO PARTITION 



6056- 


22 


ST CR) 


JLEFT PART 
;R := J 


6057- 


34 


LD CD 




6058- 


23 


CPR CR) 


!IF L<R 


6059- 


D4 


BNC CL00P2) 




605ft- 
60SB- 


02 
B9 


LD CRIB) 


:ORIG VAL OF SP 



Listing 2 



7GS9- 


20 «ft 


KF 


J-iR 


SFF4A 


76SC- 


SS 




"LA 




7B3D- 


S5 IE 




STA 


S1E 


7ESF- 


63 




PLA 




7E90- 


35 IF 




STA 


*1F 


7692- 


20 S3 


76 


JSR 


*7£38 


7E95- 


4G 92 


76 


JMP 


*7692 


7E98- 


£6 IE 




:nc 


*1E 


7S9A- 


D0 02 




BNE 


+7b3E 


7E9C- 


£6 IF 




INC 


*1F 


769E- 


AS 77 




'-DA 


41*77 


7SA0- 


48 




PHA 




7&M- 


ma 00 




LDY 


•t«08 


7GA3- 


Bl IE 




LDfl 


CSIK'.Y 


7EA5- 


29 UF 




AND 


!?S3F 


76A7- 


0A 




ASL 




7BAS- 


m 




'f\> 




76A3- 


4A 




l':j 




'6AA- 


5: .t 




am 


l» i 1 1 i 


7BflC- 


Ffl 0B 




BED 


9.76B9 


?5flE- 


3E !D 




STX 


*1D 


7SB0- 


4A 




lSR 




7EB1- 


an 




LS* 




76B2- 


4fl 




LSR 




7SB3- 


AS 




~AY 




7GB4 - 


B9 El 


76 


LDfl 


*76El. V 


7BB7- 


48 




*Hrt 




7i-,B8- 


60 




RTS 




7BB9- 


E6 jE 




INC 


*1E 


76BB- 


D0 02 




BNE 


*76BF 


7EBD- 


E6 IF 




INC 


*1F 


7SBF- 


BD E4 


/6 


LDfl 


*7EE4, X 


'>-,'.::• - 


as 




PHA 




7l-,C3- 


AS il) 




LDA 


SID 


7BC5- 


aA 




LSR 




'SC6- 


60 




srs 




7EC7- 


68 




°LA 




76CS- 


68 




PLA 




76C9- 


20 3F 


"F 


JSR 


SFF3F 


7bCC- 


£C IE 


m 


JMP 


I.S.001K) 


7t.CF- 


Bi IE 




LDfl 


C*1E), Y 


7BD1- 


35 01 




STA 


*01. X 


7BD3- 


88 




DEY 




7SD4- 


61 IE 




LDA 


CS1E). Y 


7L0E- 


95 00 




STA 


402, X 


7BDS- 


9S 




TYA 




76D9- 


38 




SEC 




7GDA- 


65 lE 




fiDC 


41E 


7GDC- 


35 IE 




STA 


ML" 


7SD£- 


90 02 




BCC 


*7££2 


76E0- 


£E IF 




INC 


*1F 


7v,E2- 


£0 




RTS 




7BE3- i3 


2 F3 04 


9D 


0D 


;Juap Table 



7bES- 9E 25 HF 16 B2 U7 B9 51 

7BF0- C0 2F C9 5B D2 35 DD BE 

7BFS- 05 33 £8 70 93 IE £7 B5 
7730- E7 £7 E7 



7 73J- 


10 


CO 


7705- 


B5 


00 


7707- 


35 


00 


7709- 


B5 


01 


770B- 


85 


01 


770D- 


£0 




770E- 


A5 


00 



BPL 


S76CF 


LDA 


100. X 


STA 


400 


LDA 


S01. X 


STA 


$01 


RTS 




LDA 


*00 
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7710- 


95 


00 




STA 


$00, X 


7712- 


05 


01 




LDA 


$01 


7714- 


95 


01 




STfl 


£01, X 


7715- 


r.0 






RTS 




77.7- 


05 


00 




LDA 


£00 


7719- 


81 


00 




STO 


1*00, X) 


771B- 


AG 


00 




LDY 


#$00 


77 1D- 


84 


ID 




STY 


SID 


771F- 


FG 


00 




INC 


$00, X 


7721- 


D0 


02 




BN£ 


$7725 


7723- 


FB 


01 




INC 


301, X 


7725- 


£0 






RTS 




7726- 


Al 


00 




LDfl 


($00, X) 


772S- 


85 


00 




STfl 


$00 


7720- 


00 


00 




LDY 


#$00 


772C- 


34 


01 




STY 


$01 


772E- 


F0 


ED 




BEQ 


$771D 


7730- 


00 


00 




LDY 


#$00 


7732- 


Fia 


06 




BEQ 


S773A 


7734- 


26) 


66 


77 


JSR 


$7766 


7 737- 


01 


00 




LDO 


($00, X) 


7739- 


08 






TOY 




7730- 


20 


66 


77 


JSR 


S7766 


773D- 


01 


130 




LDO 


($00, X) 


773F- 


85 


00 




STO 


$00 


7741- 


84 


01 




STY 


$01 


7743- 


00 


00 




LDY 


B$00 


7745- 


S4 


ID 




STY 


•10 


7747- 


60 






RTS 




7748- 


20 


26 


77 


JSR 


$7726 


774B- 


01 


00 




LDO 


($00, X) 


774D- 


85 


01 




STfl 


$01 


774F- 


4C 


IF 


77 


J MP 


$77 IF 


7752- 


20 


17 


77 


JSR 


$7717 


7755- 


05 


01 




LDO 


$01 


7757- 


81 


00 




STfl 


($00, X) 


7759- 


4C 


IF 


77 


JMP 


$771F 


775C- 


20 


66 


77 


JSR 


$7766 


775F- 


05 


00 




LDfl 


$00 


7761- 


SI 


00 




STfl 


($00, X) 


7763- 


4C 


43 


77 


JMP 


$7743 


7766- 


B5 


00 




LDfl 


$00, X 


7768 


D3 


S2 




-BNE- 


*776C 



7760- 


D6 


01 


DEC 


$01, X 


776C- 


D6 


00 


DEC 


$00, X 


776E- 


60 




RTS 




776F- 


A0 


00 


LDY 


#$00 


7771- 


38 




SEC 




7772- 


05 


00 


LDO 


$00 


7774- 


F5 


00 


SBC 


$00, X 


7776- 


99 


00 00 


STfl 


»0000, Y 


7779- 


05 


01 


LDA 


$01 


777B- 


F5 


01 


SBC 


S01, X 


777D- 


99 


01 00 


STO 


$0001. Y 


7720- 


98 




TYA 




7781- 


69 


00 


ADC 


#$00 


7783- 


85 


ID 


5TA 


$1D 


7785- 


60 




RTS 




7786- 


05 


00 


LDA 


S00 


7788- 


75 


00 


ADC 


400, X 


7780- 


35 


00 


STfl 


$00 


778C- 


A5 


131 


LDA 


S01 


778E- 


75 


01 


ADC 


$01, X 


7790- 


A0 


00 


LDY 


#$00 


7792- 


F0 


£9 


BEQ 


4777D 


7 794- 


05 


IE 


LDA 


$1E 


7796- 


20 


19 77 


JSR 


$7719 


7799- 


A5 


IF 


LDA 


*1F 


779B- 


20 


19 77 


JSR 


$7719 


779E- 


18 




CLC 




779F- 


B0 


0E 


BCS 


$77HF 


7701- 


Bl 


IE 


LDA 


C*1E>. Y 


77A3- 


10 


01 


BPL 


S77A6 


77A5- 


as 




DEY 




77A5- 


65 


iE 


ADC 


•IE 


77AS- 


S5 


IE 


STA 


$1E 


77AA- 


98 




TYA 




77AB- 


65 


IF 


ODC 


S1F 


77AD- 


85 


IF 


STA 


$1F 


77AF- 


60 




RTS 




77B0- 


B0 


EC 


BCS 


*779E 


77B2- 


60 




RTS 




7763- 


00 




ASL 




77B4- 


on 




"(AX 




77B5- 


B5 


01 


LDO 


$01, X 



77B7- 


10 


E8 


BP^ 


$77Al 


77B9- 


£0 




RTS 




77BA- 


0A 




ASL 




77BB- 


00 




TAX 




77BC- 


B5 


01 


LDA 


$01, X 


776E- 


30 


El 


BMI 


S.77A) 


77C0- 


60 




RTS 




77C1- 


00 




ASl 




77C2- 


AO 




TAX 




77C3- 


B5 


00 


LDA 


*00, X 


77C5- 


15 


0! 


IJRA 


*0; . < 


77C7- 


F0 


DS 


BEQ 


$7701 


77C9- 


60 




RTS 




77CA- 


0A 




ASl 




77CB- 


AA 




TAX 




77CC- 


B5 


00 


LDA 


*00. X 


77CE- 


15 


01 


ORA 


S01.X 


77D0- 


D0 


CF 


BNe 


$77A1 


77D2- 


60 




RTS 




77D3- 


0fl 




ASL 




77D4- 


A A 




TAX 




77D5- 


B5 


00 


LDA 


$00, X 


77D7- 


35 


01 


AND 


$01, X 


77D9- 


49 


FF 


ECS 


4?tFF 


77DB- 


FU 


C4 


BEQ 


S7701 


77DD- 


60 




RTS 




77DE- 


0fl 




ASL 




77DF- 


AA 




TAX 




77E0- 


B5 


00 


LDA 


$00, X 


77E2- 


35 


01 


AND 


$01, X 


77E4- 


49 


FF 


EOR 


#$FF 


77E6- 


D0 


B9 


BNE 


$7701 


77ES- 


60 




RTS 




77E9- 


A2 


1S 


LDX 


#$18 


77EB- 


20 


66 77 


JSR 


57766 


77EE- 


01 


00 


LDA 


($00, x:> 


77F0- 


35 


IF 


STA 


$1F 


77F2- 


20 


66 77 


JSR 


*77B6 


77F5- 


Al 


00 


LDA 


($00, X) 


77F7- 


35 


IE 


STA 


*lt 


77^9- 


60 




RTS 




77FA- 


4C 


C7 76 


JMP 


*76C7 



Listing 3 



l 

Ll 
i.2 
I 
J 
U 
R 
x 

Al 

MIDPT 
MJ 
H10 
SP 
'l 



;*»,»■* QUICKSORT *♦■** 

; * * 

SWEET lb DEMO * 

PROGRAM * 



i* 

; * 
i* 

!* 

;» 
;* 
I* 

;* 



BY 

C.K.TAYLOR. JR. 
APRIL 1981 



.BA $6000 
■ OS 

.DE $7500 
.DE »73KE 
.DE 1 
.UE 2 
.DE 3 
.DE 4 
.DE 3 
.DE b 
.DE 7 
.DE 8 
.DE 10 
.DE 11 



iSORT FROM HERE 
;TI3 HERE 



,*•*** SPEED 16 MACROS **** 



1* 




* 


t<¥ 


BY 




■* 




* 


l» 


C.F. TAYLOR, JR. 


* 


«* 




* 


1* 


APRIL 19B1 


* 


1* 




* 



LOAD 

STORE 



JSWEET16 SUBROUTINES 
.DE »7705 
.DE »770E 



LOQDI 


.DE 


•7726 




STOREI 


.DE 


»7717 




DLOODI 


.DE 


•7748 




DSTOREI 


.DE 


•7752 




POPS 


.DE 


•7730 




PUSHS 


.DE 


»773C 




ADDITION 


.DE 


•7786 




SUBTROCT 


.DE 


•776F 




P0P1B 


.DE 


•7734 




COMPORE 


.DE 


•7771 




INCREMENT 


.DE 


•77 IF 




DECREMENT 


.DE 


•77S6 






1P0QE ZERO LOCATIONS 


R0L 


.DE 


•00 




R0H 


.DE 


•01 




R14H 


.DE 


• ID 






1 

IMACRO DEFINITIONS 


! •. • SETUP 


.'md 


(REG) 


iFOR SUBR CALL 




LDO 


ttREG 






ASL 


A 


; DOUBLE TO INDEX 




STO 


*R14H 


; 16-BIT REG 




TAX 








.ME 






! ! 'SETR 


.MD 


<REG ODDR) 




SETUP (REI3) 






LDA 


*H, ADDR 


■■HI BYTE 




STA 


*R0H, X 


;IN PROPER REG 




LDA 


ttL, ADDR 


!L0 BYTE 




STA 


*R0L, X 






.ME 






! ! !LD 


.MD 


(REG) 






SETUP «REU) 






JSR 


LOAD 






.ME 






1 ! 'ST 


.MD 


(REG) 






SETUP (REG-) 






JSR 


STORE 
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GET 120% VALUE FOR YOUR 

PROGRAM PURCHASING DOLLAR 

WITH 



MORE THAN JUST A DATABASE 

Version 2 of the versatile Modifiable Database 



/ 



7fl-7fl 


eo-w 


^^k OTHER 


60-69 A 




^B 


SQ-5?—-« 




"■^J^r^-j^-io 


•HS-H*S* 






5#" 

PRESS Nil. kEV 


.-./ 


Vo-.*- 




POWERFUL 
DATA MANAGER 



DATA PLOT 
& ANALYSIS /gggg 




o 

Ol/ 



Data may be plotted in a variety 
of formats such as scatter graphs, 
line graphs, bar charts, and pie 
charts. 

Ranges, minimums, maximums, 
means, standard deviations, cor- 
relation coefficients, etc. of any 
number of data files can be 
calculated 



' Versatile, user definable database can store 
data segmented by up to 35 fields. 
" User oriented format is easy for the novice 
or professional to utilize. The use of menus, 
extensive prompting, single keystroke com- 
mands, and a universal escape capability allow 
anyone to store or retrieve information in 
seconds without errors. 
' Machine language searches and sorts operate 
in a fraction of the time required by other 
programs. 
■ Searches or sorts, subtotals or totals may 
be performed on any field at any time, not 
just on those that are indexed or specified in 

advance. 

" Search results may be displayed, printed, 

deleted, counted, totalled, edited, and/or 

saved to a new data file. 




" The sophisticated report generator allows 
you to format your data output in an infinite 
variety of ways. 

You can print form letters, columnar 
reports, lists, mailing labels, etc. 
• Data, ratios or the results of calculations 
can be embedded anywhere in your letters or 
reports. 

" The report generator gives your output the 
professional appearance that you require. 



SYNERGISTIC SOFTWARE 

ORDER YOURS TODAY! 



Floppy Drive version $220.00 - Hard Drive version $220.00 

Available from your local dealer or send check or money order to Synergistic Soft- 
ware, 5221 120 Avenue S.E., Bellevue, Washington 98006 or phone 206-226-3216. 

Washington residents add 5.4% sales tax. 
Apple is a trademark of Apple Computer, Inc. 



- HARD DISK DRIVE COMPATIBILITY 

with hard drive version, works with Corvus 
and other hard drives. 
" Works with all Floppy drives with slot, 
drive and volume selection. 
* You can append or merge up to a full disk 
of data files, or segment your data into sep- 
arate files by a search key. 

• Searches can contain up to 10 levels. You can 
search for a key word in any field, the absence 

of a keyword, or a number being within a 

specified range. 

* Global editing of data may be performed. 

" Arithmetic processing can be performed 

during record entry, edit, or output. 

■ Record entry, edit, or deletion (individual 

records or blocks) can be performed with no 

tedious delays waiting for disk accesses, index 

file updates, etc. 

* Data may be stored on any number of floppy 

or hard disk drives. 

" Data files can be reformatted at any time 

without reentering the data. 

" With $5.00 Registration Fee receive one 

backup disk. 

• The package requires an Apple II plus or 

Apple II with Applesoft firmware, 48K RAM, 

at least one disk drive, and DOS 3.3. 
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IJecision 

Deciiion Systems 














. ME 






1 ! 'LD3 


.MD iREG) 
SETUP 'REG) 
JSR LUADI 
.ME 




l"l P.O. Box 13006 

CJyStemS Danton, TX 76203 




i ' !8T3 


. MD iREG) 

SETUP (REG) 

JSR STORE I 

.ME 

. MD i.REG) 




SOFTWARE FOR THE APPLE II- 
ISAM OS is an integrated set ol Applesoft routines 'hat gives indexed file capabilities 




1 ! ' LDDa 




io youi BASIC proqiarns Retrieve bv key. partial key or sequentially Space Irom 






SETUP (REG) 




deleted records is automatically reused Capabilities and performance thai match 






JSR DLOADI 




products costing twice as much. 






.ME 




$50 Disk. Applesoft 




1 i ■ stub 


.MD (REG) 
SETUP (REG) 




P8ASIC-DS is a sophisticated preprocessor tor structured BASIC. Use advanced 








logic constructs such as IF ..ELSE . CASE. SELECT, and many more Develop 
piograms lor Integer or Applesoft Enjoy the power ol structured logic at a traction ol 






JSR DSTUREI 








.ME 




the cost of PASCAL 




■ • i popa 


.MD (REG) 
SETUP (REG) 
JSR POPS 
.ME 




S3S Disk, Applesoft (48K. ROM or Language Cardl 

DSA-DS is a dis assembler for 6502 code Now you can easily dis assemble any 
machine language program tor the Apple and use the disassembled code directly as 
input to your assembler Disassembles instructions and date Produces code com. 




! ! ' STP3 


.MD 'REG) 
SETUP (REG) 
JSR PUSHS 
.ME 




patible with rhe S-C Assembler 'version 4 0). Apple's Toolkit assembler and others 
$25 Disk. Applesoft (32K. ROM or Language Cardl 

FORM-OS is a complete system for me definition of input and output froms FORM 








DS supplies the automatic checking ol numeric input toi acceptable range of values. 




1 ! !ADD 


.MD (REG) 

SETUP (REG) 

JSR ADDITION 

-ME 

.MD (REG) 




automatic formatting of numeuc output, and many more features 
$25 Disk. Applesoltl32K. ROMoi Language Cardl 

UTIL-DS is a set of routines for use wilh Applesoli lu loimat numeric output solec 








nvelv dear variables 'Applesoft s CLEAR gets everything!, improve error handling 




! ! ! SUB 




and interface machine language with Applesoft programs. Includes a special load 






SETUP (REG) 




routine lor placing machine language routines underneath Applesoft programs 






JSR SUBTRACT 

.ME 

.MD (REG) 

SETUP (REG) 




$25 Disk. Applesoli 




! ! 'POPDa 




SPEED-DS is a routine to modify the statement linkage in an Applesoli program to 






speed its execution improvements of 5-20% are common As a bonus SPEED DS 








includes machine language routines 10 speed slung handling and reduce the need to- 






JSR POP1B 




garbage clean-up. Authui Lee Meador 






.ME 




$15 Disk. Applesoft (32K. ROM or Language Cardl. 




1 ' ICPR 


.MD (REG) 

SETUP (REG) 

JSR COMPARE 

.ME 

.MD iREG) 

SETUP (REG) 




(Add $4 00 lor Foreign Mail) 




! ! ' I NCR 




'Apple II is a registered trademark of the Apple Computer Co 






JSR INCREMENT 




LDA *R0L. X ;TEST KOR Id 
LIRA *R0H. X iCBOTH BYTES) 






.ME 




BEG DEST 




1 ! !DECR 


.MD IREG) 
SETUP (REG) 
JSR DECREMENT 
.ME 




.ME 
' ! 'BNZ .MD IDEST) 
TEST 
LDA *R0L. X ;TEST BOTH 




! ! ! RTN 


.MD ITO fc-502 CODE 
JSR SFF3F ; RESTORE REGS 
.ME 




0RA *R0H. X ; BYTES 
BNE DEST 
. ME 




! ! IGETCARR . MD 




1 ! 'BMI .MD (DEST) 






LDA *RlftH ; STATUS REG 




TEST 






LSR A 5EXTRACT CARRY BIT 




LDA *R0L.X ;TEST KOR SFF=-1 






.ME 




AND *RBH, X ;(B0TH BYTES) 




11 'BR 


.MD (DEST) 
JMP DEST 
.ME 




EOR MiFF 
BED DEST 
.ME 




' ! ' BNC 


.MD 'DEST) 
LiETCARR 
BCC DEST 
.ME 




'. '. ' BNM1 . MD ' DEST) 
TEST 

LDA *R0i_, X 
AND *-R0H, X 




!■ !BC 


.MD 'DEST) 
UETCARR 
BCS DEST 
. ME 




EOR «t*FF 
BNE DEST 
.ME 
! ! I BK . MD 




! ! ! TEST 


.MD '.GET PREV RESULT 

GETCARR 

HSL A J BET PRIOR REG * 

TAX 

.ME 




BRK ;b502 JNSTR 
.ME 
! ' ! RS . MD 

RTS ;S502 INSTR 
.ME 




"'HP 


.MD 'DEST) 

TEST 

LDA wRfflrti X 

BPL DEST 

. ME 




'MBS .MD t.DEST) 

JSR DEST i DIRECT ADDR MODE 

.ME 
! ! 'aSWIS .MD 

JSR SFF4A 5SAVE REGISTERS 




' ' 'BM 


.MD 'DEST) 

VEST 

LDA *RBHi X 

BMI DEST 

.ME 




.ME 

.LB 

UNITIALIZE 




!! !JJZ 


.MD IDEST) 
TEST 




. ES 

aswis ;call sweetie 
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6000- 20 4ft FF 


SETR (BP S7900) ; STOCK POINTER 


6042- 95 00 

STD3 ISP) 


5PUSH 


6003- 09 0B 




E044- 09 0B 




E005- 0ft 




6046- 00 




B006- S5 ID 




6047- 85 ID 




600S- flfi 




6049- 00 




6009- 09 79 




6040- 20 52 77 




600B- 95 01 








600D- 'A3 00 






: LOOP J IS ThE 


600F- 95 00 


5ETR |R!0 S7900) ;SOVE FDR LATER 




; CONTROL LOOP HMD 

i DEC IDES WHICH BLitiLIST 


601 1- 09 00 






:T0 HOR-ITtON NEXT 


6013- 0ft 






J 


6014- S5 ID 




1.00P1 


POPOa 'HP' ;GET HDUNDORIES 


6016- Oft 




604D- 09 0B 




6017- 09 79 




604 F- 00 




6019- 95 01 




6050- 85 ID 




60 IB- 09 00 




6052- 00 




501 D- 95 00 


SETR t0 L.1) ;FIRST ODDR TO SORT 


6053- 20 34 77 


ST CR) UV NEXT SUBLIST 


50 IF- 09 00 




6055- 09 04 




6021- 00 




6058- 00 




6022- 85 JD 




6059- 85 ID 




5024- 00 




605B- 00 




6025- 09 75 




605C- 20 0E 77 




6027- 95 01 






P0PD3 (SP) ;T0 PARTITION 


6029- 09 00 




605F- 09 0B 




602B- 95 00 


STD3 ISP) ;PUSH 


60E1- 00 
6062- 85 ID 




602D- 09 0B 




60E4- 00 




602F- 00 




G0E5- 20 34 77 




6030- 85 ID 






ST (L) 


6032- ftfi 




6068- 09 03 




6033- 20 52 77 


SETR 10 i.2) SLOST HDDH TO SORT 


6060- 00 




6036- 09 00 
E03S- Oft 
5039- 85 ID 




606B- 85 ID 

60ED- Oft 

606E- 20 0E 77 _ 




603B- Oft 






;LO0P2 DOES THE 


F.03C- 09 75 






50CTU0L PORTITIONING 


6036- 95 01 




L00P2 


LD iL) ;l := |_ 


5040- 09 FE 




6071- 09 03 
6073- 00 





The powerful package; 
Super-Text II™ 



plus Form Letter™ 



Allows you to learn the basics of text editing 
quickly. Advanced features will meet your 
expanding word processing requirements 
far into the future. $150.00 



Stores names, addresses, and telephone 
numbers and prints mailing labels. Has 
user-definable category system. $49.95 



plus Address Book™ 

■^ ^ m Provides automatic repetitive printing of letters. 

Allows insertion anywhere in a letter, also direct 
entry, optional prompting, special commands. 

$100.00 

From the leader in word processing 
for the Apple II or II Plus 



MUSE 



SOFTWARE - 
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Efl74- 


85 


ID 


B07S- 


00 




Bfl77- 


20 


05 77 


6070- 


09 


01 


607C- 


00 




607D- 


85 


ID 


607F- 


00 




E080- 


20 


0E 77 


6083- 


09 


04 


6085- 


00 




6086- 


85 


ID 


6088- 


00 




5089- 


20 


05 77 


608C- 


09 


02 


608E- 


00 




608F- 


85 


ID 


6091- 


00 




6092- 


20 


BE 77 


6093- 


09 


03 


6097- 


00 




6098- 


85 


ID 


6090- 


00 




609B- 


20 


86 77 


609E- 


20 


3F FF 


6001- 


66 


01 


6003- 


66 


00 


6005- 


09 


FE 


6007- 


25 


00 


6009- 


85 


80 


60OB- 


20 


40 FF 


60AE- 


09 


07 


60B0- 


00 




60B1- 


85 


ID 


60B3- 


00 




60B4- 


20 


BE 77 


60B7- 


09 


87 



60B9- 80 
60BO- 85 ID 
60BC- 00 
60BD- 20 48 77 

60C0- 09 05 
60C2- 00 
60C3- 85 ID 
6BC5- 00 
60C6- 20 0E 77 



ST II) 



LD CR) 



ST fJ) 



HDD ID 



HTN 

LSR wRBH 
ROR *R8L 
LDfl #»FE 
OND *R0L 
STO *RBL 

3SW16 



iJ := R 



iRB := L+R 



;BOCK TO b5B2 

;DIVIDE BY 2 

;MOSK ODD BIT 

-,T0 C3ET EVEN WORD BOUNDARY 
iBOCK TO SWEET 16 



ST (MI DPT) ;SOVE RESULT 



LDD3 IMIDPT) 



ST (X) 



; 



! FETCH THOT ITEM 



: MIDDLE ELEMENT OF LIST 



LO.0P3 



LD0P4 



6BC9- 09 01 
6BCB- 00 
6BCC- 85 ID 
60CE- 00 
60CF- 20 48 77 

60D2- 09 06 
60D4- 00 
60D5- 85 ID 
60D7- 00 
60D8- 28 HE 77 

60DB- 09 05 

6BDD- 80 

60DE- 85 ID 

60E0- 00 

60E1- 28 71 77 

60E4- 05 ID 
6BE6- 40 
60E7- 98 E0 



iL00P3 1NTERCH0NGES ELEMENTS 
;T0 HCCOMPLISH PARTITION 
iABOUT MIDPT CVOLUE X) 

1 



;L00P4 KINDS AN ELEMENT 
iTO LEFT OF MIDPT WITH 
I VALUE > X 

LDD3 <I> ;OCI) 



ST (01) 5S0VE 



cpr ix) ;loop 



BNC IL00P4) ;U(MTIL AlI)>=X 



DECR ll) ; ADJUST POINTER 



ELCOMP 



BOOKS and 
SOFTWARE 



For ATARI - PET/CBM - OSI - 6S02 



8K Microsoft BASIC Refe- 
rence Manuel 

Authoritative reference lot the 
original Microsoft 4K ♦ 8K 
BASIC developed for Altair 
and later compute's including 
OSI,PETandTRS-80. 
Order-No. 141 19.95 

Expansion Handbook for 
6603 end 6802 
S 44 Card Manual describes all 
of the 4 5 x 65 44-pin S-44 
cards incl. schematics. A 
MUST for every KIM-. SYM- 
and AIMowner. 
Order No. 162 89.95 

Microcomputer Application 
Notes 

Reprint of Intel's most im- 
portant application notes in- 
cluding 2708. 8085. 8255. 
6251 chips. Very necessary for 
the hardware buff. 
Order-No. 163 89.95 

Complex Sound Generation 
New revised, applications 
manual for the Texas Instru- 
ments SN 76477 Complex 
Sound Generator. Circuit 
Board available (88.951. 
Order-No. 164 86.96 

Small BuMnm Programs 
Complete listings for the busi- 
ness user. Inventory. Invoice 
Writing. Mailing Lisi and much 
more. Introduction to Busi- 
ness Applications. 
Order-No. 166 814.90 

The First Book of Ohio 
SotontJfk 

Introduction to OSI com- 
puters. Diagrams. Hardware 
and software information not 
previously available in one 
compact source. 192 pages. 
Order-No. 167 87.85 

The Second Book of Ohio 
Scientific 

Very valuable infor ma t ion 
about OSI microcomputer sy- 
stems. Introduction to OS-65 
D and OS-65U Networking. 
Hardware and Software hints 
and lips. Systems specifi- 
cations. Business applications. 
Order-No. 168 87.95 

The Fourth Book of OHIO 
Very Important Programs 
Many interesting programs for 
OSI computers. Sorting (Bi- 
nary Tree). Differential Equi- 
tation. Statistics. Astrology. 
Gas Consumption. Games a.s.o 
Order-No. 160 89.95 

VIP Package - Above book 
plus a cassette with the pro- 
grams. 
Order-No. 160 A 819.95 

Invoice Writing Program for 
OSI-C1PMF.C4P, Oisk and 
Cassette. 8K RAM. 
Order-No. 8234 829.80 

Mailing List for ClPMF or 
C4PMF 24K RAM 
250 addresses incl. phone 
number and parameters on 
one 5 1/4 Disk) 

Order-No. 8240 829.80 



^ 



Programs for the Challenger 
C1/C2 8K 

Order-No. 2004 "Bare Bones" 
Wordprocessor 89.96 

Order-No. 2006. "Bare Bones" 



Mailing List 



89 95 




Important Software lor CBM 
16K/32K 

Most powerful Editor/As- 
sembler for Commodore CBM 
16/32K on cassette. Assembler 
can be started directly from 
editor or from the TIM-Mo- 
nitor. Translates in three 
passes. It an error is encoun- 
tered, automatic return to the 
editor. Cassette with DEMO. 
Order-No. 3276 839.00 

MONJANA/1 Makes Machine 
Language Programming Easy I 
In every Commodore CBM 
there is a spare ROM socket 
wailing for ifs MONJANA/1. 
The new MONJANA/1 Ma- 
chine Language Monitor in 
ROM offers more user 
guidance and debugging aids 
than any other monitor 
available today. Comprehen- 
sive manual included. 
Order- No. 2001 
SPECIAL PR ICE 849,00 

JANA-Monitor on Cassette lor 
the PET. Similar to MON- 
JANA/1 . Very powerful. 
Order-No. 2002 819.96 

Programming in Machine 
Language with the Commo- 
dore PET 

This book Includes EDITOR/ 
ASSEMBLER, MONJANA. 
JANA. EDITOR. ASSEM- 
BLER. LINKER and DISAS- 
SEMBLER, HEXDUMP and 
complete descriptions of the 
programs. 

Order-No. 166 819.95 

BLANK CASSETTES 
Highest Quality CIO cassettes 
Blank Cassettes (Quantity 10) 
Order-No. 8095G 84 J» 

ATARI OWNERS TAKE 
NOTE: 
EPROM BURNER fur ATARI 
400/800. Bare boards only 
with description, schematic ♦ 
software (2716. 27321. 
Order-No. 7041 899.00 

Invoice Writing for very small 
business with ATAR I 400/800 
16K RAM. 

Order-No. 7022, cass. 829.85 
Order-No. 7200. disc. 839.99 
ATARI-BASIC - Leemlng by 
Using 

A new book with programs 
and learning exercises. Many 
of the programs are appro- 
priate for beginners as well 
as experienced computer 
users. (Screen Drawings, Spe- 
cial Sounds. Keys. Paddles + 
Joysticks. Specialized Screen 
Routines. Graphics and Sound. 
Peeks and Pokes and special 
stuff). 

Order-No. 164 89.95 

ATMONA-1 Machine 

Language Monitor for the 
ATARI 400/800 
This powerful 
vides you with the firmware 
support that you need to get 
the most out Of your powerful 
system. ATMONA-1 comes on 
a bootable cassette. No car- 
tridges required. Disassemble. 
Memory Dump HEX + ASCII. 
(Change Memwy Locations. 
Block transfer. Fill memory 
block. Save and Load Ma- 
chine Language Programs. 
Start Moch Lang. Prog'. (Prin- 
ter Oplions)). 

Order-No. 7022 & 19.95 

ATMONA-2 Supersteoper 
A very powerful Tracer to ex- 
plore the ATARI ROM/RAM 
area Stop at previously selec- 
ted address. Opcode or 
operand, (cassette) 
Order-No. 7049 (includes AT- 
MONA-1) 84956 
EDITOR/ASSEMBLER for 
ATARI 800. 32K RAM 
Extremely fast and powerful 
Editor /Assembler. I8K Source- 
code in about 5 seconds) 
includes ATMONA-1. (cass.) 
Order-No. 7098 849.95 
MACRO- Assembler for 
ATAR l SCO. 48K RAM (cass > 
Order-No. 7099 889.00 



litor pro- 



Care and Feeding of the Com- 
modore PET 

'Eight chapters exploring PET 
hardware. Includes repair and 
interfacing information. Pro- 
gramming tricks and sche- 
matics. 
Order-No. 150 89.95 

ELCOMP Publishing, Inc. 

53 Redrock Lane, Pomona, CA 91766 

Phone:(714)623-8314 

Payment: Check. Money Oroer. VISA, Mastercharge. Euroscheck. 
POSTPAID or PREPAID in USA. S 5.00 handling fee for C.O.D. 
All orders outside USA: ADD 15 % shipping. CA add 6 % sales tax. 
ATARI is a registered trademark of ATARI INC. 

Pi. ; T.'CUM ■'. a nqistered trademarfc_gj_CojnmgoOreJ£u^nes^^ 



No. 44 -January 1982 



MICRO - The 6502/6809 Journal 



39 



Lazer isn't afraid to compare! 

(because we have the best lower case system available.) 

Despite the fact that we were one of the first manufacturers to produce lower case equipment for the Apple II, Lazer 
Microsystems products are still the state-of-the-art. Beside the obvious price/performance advantage we have over the 
competition, our products are expandable. Lazer is constantly introducting new products including our Lower Case + Plus 
II, Character Set + Plus (that adds 2 additional character sets to the Lower Case + Plus), and our new "Double Vision 
+ Plus" for owners of Computer STOP'S Double Vision 80-column board. 

Lazer's products are compatable with more word processors than anybody else's. Our Lower Case + Plus is compatable 
with Easywriter and unmodified Apple writers. None of our competitors below can make that claim. In fact, BASIS' board 
isn't even compatable with Programma's PIE! The following chart lists Lazer's superiority over the competing units. 

(IC- ' Lower Case • Plus LC-ll - Lower Case • Plus II. KB- - Keyboard • Plus, 

Paymar KB+/ KB+/ 

Feature LCA-1 LCA-2 VIDEX BASIS VISTA LC+ LC+II LC+II LC+ KB+ 

True ASCII upper/lower 

case display YYYYNYYYYN 

Inverse Lower Case N N rev7only N — Y N N Y — 

Font Size 5x7 5x7 5x8 5x8 — 5x7, 7x8 5 x 7 5x7 5x7, 7x8 — 

# of on-board character sets U p to 4 

1 1 1 1 — (2 std) 1 1 up to 4 — 

Pseudo-descenders YYNN YYYY — 

True descenders N N Y Y — optional N N optional — 

Optional fonts avail. (ROM, disk) NNNY — YNNY — 
2716-compatible character 

generator compatable with fonts NNNN — YNNY 

created by HIRES character 
generators 

On-board graphics character set NNNN — YNNY — 

Software provided on diskette $5 extra NN — YNNYY 

Single board works with all Apples NNNNYYNNyy 

Expandable System NNNNNYYYYY 

Extensive user Documentation NNYNNYYYYY 

High quality PC board N — YYYY — YYY 

Reset key disable NNYYNNNYYY 

Shift key mod NNYYNNNYYY 
All 128 characters available 

from keyboard --NN--_ Y Y Y 

Type ahead buffer NNNNYNNYYY 

# of characters in buffer - 40 - _ 64 64 64 

Ability to clear or turn off buffer _ _ _ _ N - 

ppifp IT 

5995 49 -95 129.95 125.00 49.95 64.95 29.95 129.90 164.90 99.95 

JK Se,, ' e l° r ! ny,hin9 ' eSS than the L0Wer Case + Plus ' Lower Case + Plus II, or Keyboard + Plus. If your dealer doesn't 
stock our products g.ve us a call, we'll try to connect you with a dealer in your area. youroea.eraoesn t 

LoleS Ad^ ?," ° r Wri,e f ° r ° Ur ,ree b00kle, " Ke y board Enhances/Buffers and 

case ^adapter to your App^.l * b00kle, eXP ' amS ,he advan,a 9 es and disadvantages of using a lower 

Lazer products are carried by reput- State of the art performance, software Visicalc Users" Now you can 

able dealers all across the world. If your compatability, and exceptional value have lower case on your Visicalc 

dealer cannot provide you with a make Lazer's products the best there are! Screen, only from Lazer 
demonstration of our equipment and 

tries to sell you an inferior lower case Lower Case + P,us 564.95 

adapter, give us a call, we'll give you the Keyboard + Plus $99.95 

location of a dealer that can show you Lower Case + Plus II $29.95 

our equipment. Remember, an intel- Character Set + Plus $24.95 

ligent purchase cannot be made if you Double Vision + Plus $39.95 ._,„_ 

do not compare before buying. ^* ^MILUU -Y^TCM:^^ |f . c 

** " ■■■ •«« 2Sl?rtf»^ 

Lazer Pascal $39.95 (714) 735-1041 





E0E9- 09 HI 
60EB- 00 
E0EC- 85 ID 
S0EE- 00 
60EF- 20 BE 77 

60F2- 09 01 
60F4- 00 
E0F5- 35 ID 
E0F7- 00 
E0F8- 20 66 77 



DECR CIS 



LOOPS 



60FB- 09 02 
S0FD- 00 
60FE- 85 ID 

6100- 00 

6101- 20 48 



77 



6104- 09 02 

6106- 00 

6107- 85 ID 

6109- 00 
6100- 20 66 77 

610D- 09 02 
610F- 00 

6110- 85 ID 

6112- 00 

6113- 20 66 77 

6116- 03 MS 

6118- 00 

6119- 85 ID 
61 IB- 00 

61 1C- 20 0E 77 

SI IF- 09 05 

6121- 00 

6122- 65 ID 
£124- 00 
6125- 20 05 77 

6128- 09 08 

6120- 00 
612B- 35 ID 
61 2D- 00 
612E- 20 71 77 

B131- 05 ID 

6133- 40 

6134- B0 15 

6136- 09 02 

6138- 00 

6139- 85 ID 
613B- 00 
613C- 20 66 77 

613F- 09 02 

6141- 00 

6142- 85 ID 

6144- 00 

6145- 20 66 77 

6143- 4C FB 60 



loops KINDS ON KLEMENT 

TO RIGHT (JF MI OPT WITH 
VALUE < X 

LDD3 CJ) ;ACJ) 



DECR CJ) ".COMPENSOTE 



DECR l.J) !FOR OUTO-lNCR. 



ST <0J) 



LD CX) 



CPR «0J) SLOOP UNTIL 



BC I.ENDL00P5) 



DECR CJ) 



DECR CJ) 



BR CL00P5) 



;0CJ) <=x 



ENDL00P5 









LD CJ) 


614B- 


09 02 






614D- 


00 






614E- 


35 ID 






6150- 


00 






6151- 


20 05 


77 


CPR CI) 


6154- 


09 01 






6156- 


00 






E157- 


85 ID 






6159- 


00 






6150- 


20 71 


77 


BNC CEND3) 


615D- 


05 ID 







ilF I>J 



;G0T0 BMD3 




..the aye oF 
r apple: 



?i# 



Though it is very simple to use, the Dithertlzer II represents 
the ultimate In video digitizing using the Apple II 
computer. The Dithertizer is an Interface card which 
converts video Input Into digitized images. Because the 
Dithertizer II Is a frame grabber, DMA type digitizer, it 
offers extreme high speed In the conversion process (it 
grabs an entire frame in 1/60th of a second). The camera 
supplied with the package Is the Sanyo model VC1610X. 
Cabling Is supplied for this camera so as to have the 
Dithertizer II system up and running in minutes. The video 
camera used for input must have external sync to allow 
for the frame grabber technology employed for digitizing. 
If a camera other than the model recommended is used, 
wiring adaptations by the user may be required. Software 
is supplied with the board to allow you to display up to 64 
pseudo grey levels on your Apple's screen. The number 
of grey levels may be changed with one keystroke. The 
intensity and contrast of the Image are controllable via 
game paddles. Also supplied is software for image 
contouring for those interested in movement detection 
or graphic design applications. 



The Dithertizer II package I* available ready 
to run with camera, Interface card and 
the software described above for only: 



Dithertizer II Interface card 
and software (without camera): 



$650. 
$300. 



Computer Station 

11610 Page Service Dr. 

St. Louis, MO 63141 

(314)432-7019 

Apple II is a registered trademark ot Apple Computer, Inc. 
Ditherthizer II is a trademark ol Comouter Station, Inc. 
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615F- 40 
6160- 90 48 

6162- 09 06 
6164- 0ft 
6155- 85 ID 

6167- Oft 

6168- 20 05 77 

616B- 09 02 
616D- 0fi 
616E- 85 ID 

6170- Oft 

6171- 20 52 77 

6174- 09 02 

6176- 00 

6177- 85 ID 
6179- 00 
6170- 20 66 77 

617D- 09 02 
617F- 00 
61S0- 85 ID 
6 182- 00 
61 S3- 20 66 77 

61 S6- 09 02 

6188- 00 

6189- 85 ID 
61 SB- Oft 
61SC- 20 66 77 

618F- 09 02 

6191- 00 

6192- 85 ID 

6194- 00 

6195- 20 66 77 

6198- 09 08 

6190- 00 
619B- 85 ID 
619D- 00 
619E- 20 05 77 

61A1- 09 01 

6103- 00 

6104- 85 ID 

6106- 00 

6107- 20 52 77 



ENDS 



6100- 09 02 
E10C- 00 
61 OB- S3~IB 
610F- fift 
61B0- 20 05 77 



61B3- 09 01 
61 B3- 0ft 

E1B6- 85 ID 
S1B8- 00 

61B9- 20 71 77 

E1BC- 05 ID 
61 BE- 4Q 

E1BF- 90 03 

61C1- 4C C9 60 



LD CJ) 



LD <ftl) 


IACD 


STD3 (J) 


: EXCHANGE 0(1) 


DECR (J) 


ittND fiCJ) 



DECR IJ) ;ftDJ POINTER TO 



DECR I J) ; PREVIOUS ELEMENT 



DECR U) 



LD CfiJ) ;OCJ> 



STD3 CI) ;FINISH EXCHANGE 



SLOOP UNTIL 



cpr ci) ;i > J 



BNC CENDL00P3) 



BR CL00P3) 



ENDLU0P3 



61 CA- 03 04 
6 1C6- 00 
B1C7- 85 ID 
S1C9- Aft 
61CA- 20 05 77 

61CD- A9 01 
61CF- BA 
61D0- BS ID 
61D2- ftfi 
B1D3- 218 71 77 

61DB- PS ID 
E1DB- 4ft 



I 

LD CR) 



CPR II) I IF 1>-R THEN 



BNC .CENDIF) iQQTO END IF 



61D9- 


90 24 






61DB- 


09 01 




LD (I) 


61DD- 


00 






61DE- 


BS ID 






61E0- 


00 






61E1- 


20 03 


77 


STDS ISP) 


61E4- 


A9 0B 






61E6- 


00 






61E7- 


B5 ID 






61E9- 


AA 






61 EA- 


20 32 


77 





61ED- A9 04 

E1EF- Oft 

61F0- BS ID 

61F2- 00 

61F3- 20 05 77 

61F6- A9 0B 
61FB- 0A 
61F9- 85 ID 
61FB- AA 
61FC- 20 52 77 



E1FF- A9 02 

6201- 00 

6202- 85 ID 
6204- AA 

6203- 20 05 77 



6208- A9 04 
E20A- 0A 
620B- 85 ID 
620D- AA 
620E- 20 0E 77 

6211- A9 03 

6213- 0A I 

6214- 83 ID 

6216- AA p 

6217- 20 03 77 

6210- 09 04 
621 C- 0A 
621 D- 83 ID 
621 F- AA 
6220- 20 71 77 

6223- AS ID 
6223- 4A 
6226- BO 03 

6228- 4C 71 60 



I PUSH FOR LATER 



LD CR) 



BTD8 (SP) 



I (RIGHT PART OF 
I LIST) 



ENDIF LD (J) 



I PREPARE TO 
• PARTITION 



•LEFT PORT 
ST CR) :R I- J 



LD CD 



CPR CR) SJ^ L<R 



BC CENDL00P2) 



BR CL00P2) 



ENDL00P2 



622B- A9 0A 
622D- 00 
622E- 85 ID 

6230- AA 

6231- 20 05 77 

6234- A9 0B 

6236- 0A 

6237- 83 ID 

6239- AA 
623A- 20 71 .77 

623D- AS ID 
623F- 4fi 

6240- B0 03 

6242- 4C 4D 60 

6243- 20 3F FF 
6248- 60 



EXIT 



LD CR10) iORIG VOL OF SP 

CPR CSP) ! STOCK EMPTY? 

BC (EXIT) !YES 

BR CL0OP1) ;N0 

RTN I DONE 

•RTS 
.EN 



JMCftO 
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MONEY BUSINESS 



Beat the I.R.S. 



You'd always pay the minimum Federal income tax if you 
had the knowledge and time to examine 120 tax return 
options. Well, now you can do it, with Datamost's TAX 
BEATER. 

Written by an I.R.S. Enrolled Agent, with 24 years of 
financial and tax planning experience, the TAX BEATER 
automatically evaluates up to 120 return options from 
your input. It searches and finds the best tax path for 
you . . . displaying up to 15, and ready to print out the 
optimum method so you pay the minimum! 

The TAX BEATER can handle it all. From income averag- 
ing to loss carryovers to 
dividends, alimony, 
pension to special 
exclusions. It's 
perfect for the 
average tax- ; 
payer . . . indis- 
pensable for 
the financia 
professional. It's 
so complete, so 
logical that, es- 
pecially in this in- 
terim year of un- 
usual tax revisions, 
it can easily pay for 
itself many times 
over. Be ready for the 
I.R.S. . . . with TAX 
BEATER, the program 
that's updated for the 
1981 tax laws! 

S129.95 on disk for 
Apple II". Completewith 
thorough, easy to follow 
documentation. 



\ 



Beat the Real Estate game 

Real Estate has always been the major wealth-builder. 
In fact, more millionaire dynasties owe their creation to 
investments in real estate than anything else. And, it 
doesn't matter . . . boom times or bust . . . inflation or 
deflation ... the knowing investor can make money, even 
create an empire! 

But, the key to real estate success is accurate analysis of 
opportunities, knowledge of cash flows, return on invest- 
ment, current and future profitability, tax consequences 
and other interrelated information — all needed, all 
necessary to making the right decision. 

And that's what REAP (Real 
Estate Analysis Pro- 
gram) is all about. It 
takes your input, 
probes for the 
right informa- 
tion, scrutinizes 
the data, the 
opportunities . . . 
and automati- 
cally delivers the 
facts . . . showing 
you the possibilities 
and why one situa- 
tion may be superior 
to another. In short, 
REAP can help you 
reap bigger profits. 
That's why REAP is the 
program for any inves- 
tor ... a must program 
for the sophisticated 
nvestor. Don't option, 
commit, invest or buy 
without it . . . whether you 
just want to make good 
money or create a suc- 
cessful real estate empire! 

S1 29.95 on disk for Apple II". 
Complete with thorough 
easy to follow documen- 
tation. 




VISA/MASTERCHARGE accepted 
$1.00 shipping/handling charge. 
(California residents add 6% tax) 

■ Apple II is a trademark ol Apple Computer, Inc 



puter 

DATAMOST 

19273 Kenya St. 

Northridge, Ca. 91326 

(213) 366-7160 



f^Uersa Writer* APPLE II: 

The Keys to Unlimited Graphics 



DRAWING TABLET 

Although VersaWriter operates on a 
simple principle, it produces graphics 
which match or exceed those of other 
digitizers. Rugged construction, trans- 
lucent base, easy to use — plugs 
directly into APPLE II. 





mm mrnij 

^ V - 

EZ Port Will Solve Your 
Came I/O Problem! 



How many times have you gone through 
the hassle of changing from game 
paddles to joystick, VersaWriter, or 
any other device using the game I/O? 
First, you have to remove whatever is 
sitting on top of the Apple-a video 
terminal, disk drives, printer, etc. 

Next you remove the computer cover 
and try to see what you're doing as 
you switch plugs to the I/O. Then you 
replace the computer cover and what- 
ever was on top of the Apple. 

After all this, you find that you can't 
run the program because the I/O 
device is plugged in backwards or is 
'off by a pin'. 

Sound familiar? 



■ m 

. - .-■---■ •■ 



UNIQUE OFFER 

See VersaWriter at your local dealer and 
pick up a copy of our demonstration 
disk. The complete VersaWriter hardware 
and software package is a real bargain 
at $249. For more information call or 
write: 



GRAPHICS SOFTWARE 

Easily the most capable and com- 
plete graphics software for the home 
computer available. Fast fill drawings 
in 100 colors. All text in five sizes, 
compile and display shapes, edit, 
move and much more! 




EZ PORT CAME 

I/O EXTENDER 

FOR APPLE II 



WHAT IS EZ PORT? 

EZ Port is a specially designed exten- 
sion unit for the Apple game I/O port. 
It's a board with a socket and a two 
foot long cable which plugs into the 
internal I/O port. You attach EZ Port 
wherever you prefer on the outside- 
on the side, the back, or on top. 

EZ Port has a ZIP DIP II socket 
(ZIP=zero insertion force). These soc- 
kets are meant to be plugged into 
many times and will not wear out like 
ordinary sockets. All you do is plug in 
the appropriate device (joystick, pad- 
dles, etc.) and flip the switch to the 
ON position. No pressure is exerted 
on the 16-pin plug until you switch, 
so all the connectors will last longer, 
too! 




EZ PORT MAKES CAME I/O 

CHANCES CONVENIENT, 

QUICK & SAFE. 

Suggested price $24.95 
Ask your local computer retailer for 
EZ Port, or contact: 

VersaComputing, Inc. 

3541 Old ConejoRd. Suite 104 

Newbury Park, CA 91320 

(805) 498-1956 

Dealers inquiries welcome. 

Apple and Apple II are registered trademarks 
of Apple Computer. Inc. 

ZIP DIP Is a trademark of Textool Products. Inc. 



Uersa Computing, Inc. 

3541 Old Conejo Road, Suite 104 
Newbury Park, CA. 91320 (805)498-1956 
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Epson MX80 Interface 

for SYM-1 



This article describes the 
hardware and software needed 
for a parallel interface of an 
Epson MX-80 printer to a SYM-1. 
The software illustrates the use 
of the SYM EXECUTE and USER 
commands. The interface also 
serves as an example 
application of the 6522 VIA. 



Richard H. Turpin 
8226 Warbler Way 
Indianapolis, Indiana 46256 



When I bought my Epson MX-80, 1 
decided not to order an interface cable, 
but to make my own since commercially 
available cables are quite expensive. 
The MX-80 standard interface is a 
parallel interface, with a serial inter- 
face offered as an option. 



The parallel interface requires an 
Amphenol connector, type number 57- 
10360 or equivalent, which I purchased 
at a local electronics store. After study- 
ing the printer manual, I decided to 
interface the printer to the SYM aux- 
iliary applications (AA) connector, and 
use the 6522 VIA #2 to provide the 
required I/O. 



Figure 1 gives the interconnections. 
Port A is the character output port, 
with control line CA2 configured in the 
pulse mode to strobe data into the 
printer buffer after it has been written 
to the port. CA1 senses the printer 
ready line. Port B provides further I/O 
such as sensing printer status and 
selecting/deselecting the printer. 



The code I wrote to drive the MX-80 
was designed to provide convenient 
control of the printer operation from 



the computer terminal. USER com- 
mands are implemented to turn on and 
off the compressed character, double 
strike, and emphasized printer modes. 
It is also possible to specify the line 
spacing. All the control codes use USR 
0. To turn on the compressed character 
format, for example, you would type 
U0 1 ^ I ^ denotes carriage return) at 
the terminal. To set up double spacing 
type U0 9-18/ . 



A listing of the interface code is 
given in figure 2. New and potential 
MX-80 owners and SYM-1 owners 
should be interested in the example 
applications of the SYM EXECUTE and 
USR commands. The EXECUTE com- 
mand is used to initialize the 6522 VIA 
and to attach the printer driver code to 
the SYM-1 monitor. To use the code 
given here, simply type E 7000 



Figure 1: SYM-1 /MX-80 Interface 



Ribbon Cable MX-80 Connector 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

14 

16 

31 

36 

32 

16 

16 



Signal 

STROBE 

Dl 

D2 

D3 

D4 

D5 

D6 

D7 

D8 

ACKNLG 

BUSY 

PE 

SLCT 

AUTO FEED XT 

Lo gic G nd 

INIT 

SLCT IN 

ERROR 

Logic Gnd 

Logic Gnd 



SYM AA Connector (VIA 2) 

AA-4, CA2 (pulse mode) 

AA-D ' 

AA-3 

AA-C 

AA-12V Port A 

AA-N 

AA-11 

AA-M 

AA-10 

AA-E, CA1 

AA-6, PB7 

AA-H, PB6 

AA-7, PB5 

AA-9, PB1 

AA-1, Gnd 

AA-L, PB0 

AA-K, PB2 

AA-J, PB4 

AA-1, Gnd 

AA-1, Gnd 



(Pins 19 through 30 connected to pin 16 on MX-80 connector.) 
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Figure 2 



7000- 47 37 30 
7003- 31 46 0D 



7006- 73 64 37 
7009- 30 33 37 
700C- 2C 41 36 
700F- 36 34 OD 



7012- 53 44 37 
7015- 30 35 35 
7018- 2C 41 36 
701B- 36 44 OD 
70 IE- OO 



70 IF- A9 FF 
7021- BD 03 A8 
7024- A9 Ol 
7026- BD 02 A8 
7029- BD 00 AB 
702C- A9 OA 
702E- BD OC A8 
7031- A9 OO 
7033- BD Ol AB 
7036- 60 



7037- 48 

7038- A9 20 
703A- 2C 00 A8 
703D- FO 05 
703F- 68 
7040- 20 48 70 

7043- 48 

7044- 68 

7045- 4C AO 8A 



704B- 48 

7049- A9 02 
704B- 2C OD A8 
704E- FO FB 

7050- 68 

7051- 8D 01 AB 
7054- 60 



7055- CD 57 A& 
7058- FO 02 



; Program to interface MX80 printer to SYM 
! by Richard H. Turpin, April 11, 1981 
i 

. ba »7000 
! 
; Initialize the VIA 

.by 'B701F' »D 



; Attach the code to SYM monitor. 
-by 'sd7037,A664' *D 



; Attach USRO code to monitor 

.by 'SD7055,A66D' »D 



j Define external refer 



crt 

1 st com 

via 

portb 

porta 

ddrb 

ddra 

per 

ifr 



■de JBaaO 
.de »A657 
.de *a800 
-de via 
-de via-*-l 
-de via+2 
. de via+3 
. de vi a+*c 
via+*d 



ences 
SYM RS-232 



service routini 



-de 



; Initialize VIA 



INIT 



Ida «*ff 
sta ddra 
Ida «1 
sta ddrb 
sta portb 
Ida **a 
sta per 
Ida #0 
sta porta 
rts 



data output (port A) 

INIT control bit 

CA2 pulse mode, CA1 nog. edge sem 
dummy write to arm flag (IFR) 



; Printing code to attach to OUTCHR 

; Test for printer on line.. if not, simply display on CRT 

print 



skipit 



ph 

Ida «*20 

bit portb 

beq skipit 

pla 

jsr toMXBO 

pha 

pla 

jmp crt now to the CRT 



save character 

check printer on line 
(0 if off line) 
retrieve character 
print it 



ervice routine 



; 

; Subroutine to output character to MXBO 
toMX80 pha save character 

Ida #2 

bit ifr wait MX80 ready 

beq =-4 

pla retrieve character 

sta porta write it 

rts 

USRO code to control MXBO format. 

code no. function 

1 compressed character ON 

2 compressed character OFF 

3 double strike ON 

4 double strike OFF 

5 emphasized ON 

6 emphasized OFF 

7 select printer 

B deselect printer 

9 set line spacing (parameter 2 - spacing, 

«C for normal, »1B for double spacing) 

USR parameter 3 storage 
31 .de »A64A 



ireon 



emp 1st com 
beq p. of 



st valid entry 
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705A- 


38 




p. bad 


705B- 


60 






705C- 


C9 


14 


p. of 


705E- 


DO 


FA 




7060- 


EO 


03 




7062- 


FO 


F6 




7064- 


EO 


02 




7066- 


FO 


30 




7068- 


AD 


4A A6 




706B- 


29 


OF 




706D- 


C9 


09 




706F- 


10 


E9 




7071- 


AA 






7072- 


BD 


B6 70 




7075- 


10 


09 




7077- 


29 


7F 




7079- 


48 






707A- 


A9 


IB 




707C- 


20 


48 70 




707F- 


68 






708O- 


C9 


11 


p. ski 


7082- 


FO 


OD 




7084- 


C9 


13 




7086- 


FO 


05 




7088- 


20 


48 70 




708B- 


18 






708C- 


60 






708D- 


A9 


00 


p. dee 


708F- 


FO 


02 




7091- 


A9 


Ol 


p. sel 


7093- 


8D 


00 A8 




7096- 


18 






7097- 


60 







flag illegal activity 



is it USRO? 

no. . 

3 params not allowed 

2 params for line spacing 



7098- 


A9 


IB 




709A- 


20 


48 


70 


709D- 


A9 


41 




709F- 


20 


48 


70 


70A2- 


AD 


4A 


A6 


70A5- 


09 


80 




70A7- 


20 


4B 


70 


70AA- 


A9 


IB 




70AC- 


20 


48 


70 


70AF- 


A9 


32 




70B1- 


20 


4B 


70 


70B4- 


18 






70B5- 


60 






70B6- 


00 


OF 


12 


70B9- 


C7 


CB 


C5 


70BC- 


C6 


11 


13 



sec 

rts 

cmp »»14 

bne p. bad 

cpx #3 

beq p. bad 

cpx »2 

beq p. line 

Ida p31 (1 parameter) get parameter 

and »*f 

cmp »»9 can't be greater than 8 

bpl p. bad 

tax move to index 

Ida table, x lookup control character 

bpl p. skip 

and »»7f mask off msb (ESC char, flag) 

pha save character 

Ida tt*lb send ESC character 

jsr toMXBO 

pla 

cmp »*11 is it printer select? 

beq p. sel 

cmp »«13 is it printer deselect? 

beq p.des 

jsr toMX80 write control character 

clc 

rts 

Ida »0 deselect printer via port B, bit 

beq p. sel +2 

Ida #1 select printer 

sta portb 

clc 

rts 



; Routine to set line spacing. 

; Second parameter specifies new spacing. 

j Hex C is standard, hex 18 gives double spacing. 

p. line Ida #»lb output ESC character 

jsr toMX80 

Ida #'A followed by an A 

jsr toMXBO 

Ida p31 get new line spacing 

ora #*B0 

jsr toMXBO 



add 128 
send another ESC 
followed by a 2 



Ida •Sib 

jsr toMXBO 

Ida »'2 

jsr toMX80 

clc 

rts 
; Table of MX80 command characters 
table .by »0F «12 »c7 »c8 «c5 «c6 »11 »13 
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What About Atari? 

Dear Editor: 

I would like to praise the inclusion 
of the new "From Here to Atari" col- 
umn by James Capparell. I feel the 
Atari is a fine machine and deserves 
more recognition. Hopefully, the new 
column signals a growing interest on 
your part to cover the Atari computer 
more fully. 

The Atari seems to have gained a 
reputation as a game computer, and 
while the games are of course good, the 
reason I bought an 800 instead of a VCS 
was that I wanted it to do more. I hope 
we can look forward to some practical 
applications appearing in MICRO soon. 

Perhaps the continuation of game- 
only articles becomes a self-fulfilling 



prophecy, and perpetuates an undeserved 
reputation. 

In the future I, and I'm sure other 
Atari owners, would appreciate your in- 
creased attention to serious Atari 
applications. 

Michael B. Moore 
San Francisco, CA 

Editor's Note: We encourage our 
readers who use Ataris to send in ar- 
ticles and applications they've devel- 
oped. We are aware of the growing pop- 
ularity of the Atari and want to expand 
our coverage of it, but need your help. 

A Call for Chemistry Programs 

Dear Editor: 

My science education class acquired 



an Apple II Plus this Fall. Now my 
chemistry students practice writing 
formulas and equations, they study the 
periodic table and account for energy 
changes between atoms, they review 
for tests and check their knowledge 
with immediate confirmation, and 
they learn the ways of atoms and elec- 
trons through animation and simula- 
tions — on the computer! 

I'd like to find out about programs 
for drills, graphics, and simulations — 
anything useful for chemistry class. 
Perhaps other teachers could help. 

Judy Toop 

Auburn Adventist Academy 

Auburn, Washington 98002 

(206) 939-5000, Ext. 236 
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SATURN SYSTEMS 32K RAM BOARD FOR APPLE 

32K of buffered read/write memory on a plug-in card 




Compatible with: Apple n® . Apple n +® . Microsoft's zso softcard® . DOS 

3.2. DOS 3.3, INTEGER Basic®, Applesoft® . PASCAL. 
FORTRAN. USA®. Personal Software's VISICALC® 



Software included: 



i. Relocation of DOS into SATURN 32K hoard 
(recovers appproximately IOK of main board 
HAM). 

2. Utility package for saving and loading 
Applesoft® and INTLGKR® programs and 
data on the 32K ram board; overlaying, 
chaining. 

3. PSLUDO-DISK: Modifies DOS 3.3 to allow use 
of SATURN 32K RAM board(s) like another 
disk drive. 



COMPREHENSIVE DOCUMENTATION • 1 YEAR WARRANTY 

ALL FOR ONLY $239.00 



NEW! 



MEMORY EXPANSION SYSTEM FOR VISICALC® 

Now you can expand the memory available to Personal Software's 16 sector 
VISICALC® using the SATURN 32K RAM BOARD! 

With VC-EXPAND ,M and one or more SATURN 32K RAM BOARDS the 
memory available to VISICALC® is increased from 18K to: 

5()K With I SATURN 32K BOARD 
82K With 2 SATURN 32K BOARDS 

VC-EXPAND supplied on 16 sector disk 
ONLY $100.00 



<h 






SATURN SYSTEMS, INC. 
P.O. BOX 8050 • ANN ARBOR, Ml 48107 < 



(313)665-6416 
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DATAMOST 

1273 Kenya ! 



It seemed like a cinch assign- 
ment. At least for the galaxy's 
master thief. 

Just sneak inside the Star- 
Complex Base, dodge a few 
guardian robots and grab the 
formula. A piece of cake. 

Oh yeah! They didn't say the 
robots went berserk at the sight of a 
human. They didn't say I'd have to 
laser my way through 7 levels. Or, 
that rampaging robots would keep 
coming and coming. 

And most of all, they didnit 
bother to say there's some weird 
blob, an unearthly something that 
tracks you right thru the damn 
walls. 

I made it to the 7th level. I found 
the formula. But, more robots are 
massing out there. And I'm 
wounded. My energy charge is low. 

You. Yes, you. How good a Thief 
are you? Prove yourself. Come get 
me. Come save me. 

S 29.95 for Apple II*. At computer 
stores, or from DATAMOST. 

VISA/MASTERCHARGE accepted. Si. 00 shipping/ 
handling charge. (CA residents add 6% tax) 

is a trademark of Apple Computer. Inc 
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PET Vet 



By Loren Wright 



What is Pascal? 

Pascal was conceived by Niklaus Wirth 
in 1970-71 as a "complete" language, 
capable of the most complex struc- 
tures, yet still easy to learn and pro- 
gram. Although the language was fairly 
well-specified by Wirth, there was 
room for improvement. Several dif- 
ferent versions have been written, all 
consistent with the basic structure of 
the language, but different in several 
minor respects. 

Probably the most popular imple- 
mentation is called UCSD Pascal, 
which was developed at the University 
of California at San Diego. UCSD 
Pascal adds some important enhance- 
ments, particularly a convenient 
method of handling character strings, 
which make it very attractive for 
microcomputer implementations. 

Another version, called "Tiny" 
Pascal, was described by Yuen and 
Chung in the September-November 
1978 issues of BYTE. As its name im- 
plies, there is quite a bit missing, in- 
cluding some of the more powerful fea- 
tures of the original. Nevertheless, it 
does make the language available 
where memory is severely restricted 
(such as in a 16K PET). 

To learn more about Pascal, read 
Victor Fricke's series, which began in 
our November issue and concludes in 
this issue. He cites a number of other 
books. 

Pascal is generally a compiled 
language. However, microcomputer im- 
plementations ordinarily use a com- 
piler which produces P-code. A P-code 
interpreter is then required for execu- 
tion. The typical microcomputer Pas- 
cal package includes three programs: an 
editor, a compiler, and a P-code inter- 
preter. As we shall see, a couple of the 
PET packages are not typical. 



Tiny Pascal — Abacus Software 

Tiny Pascal, with some enhance- 
ments, is intended primarily for learn- 
ing the language. There are actually 
two versions. One, called just Tiny 
Pascal, runs in 16K. The other, called 
Tiny Pascal Plus + , requires 32K, but 
includes enhancements for graphics 
support (limited to the quarter-boxes 
for 80 x 50 resolution plotting). 

The editor is a traditional line- 
oriented editor, where lines may be in- 
serted, deleted, moved, searched, 
listed, etc. The familiar screen-editing 
capabilities of the PET itself are not 
supported. When a source file is saved, 
all but the last line is saved. (This prob- 
lem may not be present in all versions, 
but I have called it to the attention of 
Abacus and they intend to correct it.) 

The compiler is written in BASIC, 
which means it is very slow. However, 
it also means that it is easy to make 
changes to suit your particular needs. 
The P-code interpreter has an optional 
TRACE mode, which can be helpful 
both in debugging programs and in 
learning how things work. The manual 
covers the operation of the three pro- 
grams, the differences from standard 
Pascal, and a few examples. It docs not 
cover standard Pascal or provide any 
tutorial material. 



Tiny Pascal is available for 3.0 and 4.0 PETs 
and the 8032 on 2040/4040 diskette for $35.00, 
and on cassette for $40.00. Tiny Pascal Plus+ is 
$50.00 on diskette and $55.00 on cassette. Abacus 
Software, P.O. Box 721 1, Grand Rapids, MI 49510. 



KMMM Pascal — AB Computers 

KMMM Pascal was written by Willi 
Kusche of Wilserv Industries and is 
marketed by AB Computers. This im- 
plementation is probably closest to 
Tiny Pascal, but Boolean, real, and text 
variables are supported. The editor 
combines the screen-editing features of 
the PET with the features of a tradi- 
tional line editor. The lack of line 
numbers makes it a little difficult to 
use the line commands. The compiler 
is in machine code and generates 
P-code, which is converted to exe- 
cutable machine code by a program 
called the "Translator." After this 
machine code is in place, a BASIC SYS 
command will run the compiled 
program. 

The manual, supplied to me in pre- 
liminary form, includes a description 
of the operation of the editor, the dif- 
ferences from standard Pascal with a 



few examples, and a full set of syntax 
diagrams. Standard Pascal is not docu- 
mented, nor is there any tutorial 
material. 



KMMM Pascal is available for 3.0 or 4.0 PETs 
(including 8032) on 4040 or 8050 diskette for 
$85.00. An older version, which runs in 16K but 
doesn't support floating point numbers, is avail- 
able for $75.00. AB Computers, 252 Bethlehem 
Pike, Coimar, PA 18915 



Commodore TCL Pascal 

This version, written by Keith 
Frewin of Transam Components 
Limited, and marketed in the U.S. by 
Commodore as its "Pascal Develop- 
ment System," is a standard Pascal. 
The full power of the language is real- 
ized. Producing a source file is very 
much like writing a BASIC program, 
and auto line numbering, renumbering, 
searching, and changing capabilities 
have been added. 

The compiler can be used in two 
ways. In the resident mode, the source, 
object, and compiler program are held 
in memory together. In the disk mode, 
the compiler, source, and object are all 
in files stored on disk. 

The manual includes complete doc- 
umentation of the editor and compiler. 
There's a lot of tutorial material, il- 
lustrating standard Pascal usage. How- 
ever, I would not recommend that any- 
one learn Pascal from this manual. 



TCL Pascal is available for 8032 and 8050 with 
protection ROM and manual for $295.00. An older 
version may still be available for 3.0 ROM PETs 
and 2040 for $250.00. 



Final Thoughts 

There are three very different ver- 
sions of Pascal available for the PET. 
They differ in price, "completeness," 
and in the machine configurations they 
require. Certainly the best is the TCL 
version, but it is definitely not over 
three times better than KMMM Pascal, 
as the price might indicate. Tiny Pascal 
is not as good as the other two, but it is 
the cheapest, it is modifiable, it may be 
the only version that works on your 
system, and it will fill the need for a 
teaching system. 

According to sources, Commodore 
plans to offer a UCSD version of Pascal 
for the 8096 (not the SupcrPET) some- 
time this year. Further details were not 
available. 
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IF YOU LIKED OUR 
POOL 1.5, YOU'LL 
LOVE TRICK SHOT!" 

.Watch for the "GREAT TRICK 
SHOT TOURNAMENT" 



« 



FOR YOUR 
APPLE II 



IK1 



P.O. BOX 1658 
LAS CRUCES,NM 
88004 505-522-7373 



V/hard'SO 

INSTANT 80 COLUMN APPLE 

The miracle of the 80s . . . everything you want in an 
80-column card. 



STOP STARING AT 
40 COLUMNS 

WIZARD-8D lets you see exactly 
what you will get when typing 
80-ailiimn forma! It gives you a 
lull 80-column by 24- line display 
with all these leatures. 

■ Fully compatible with Apple II 
and Apple II Plus ' 

■ Fully compatible with most word 
processors micro-modems 
and prom programmers, plus 
all current Apple II expansion 
boards 

■ Lists BASIC programs integer 
and Applesoft 

■ Fully compatible with Pascal 

■ Uses soltware to switch 
between 40 and 80 column 
formats 



■ Displays 7x9 matrix characters 

■ Provides upper/lowercase 
characters with full descenders 

■ Fully edits uses ESCape key 
for cursor movement 

■ Scrolling stop/start uses 
standard Control-S entry 
Retains text on screen while it 
is being printed 

■ Contains crystal clock for 
flicker-tree character display 

■ Has low power consumption 
for cool reliable operation 

■ Leads soldered directly to board 
lor maximum reliability 

■ 2Kon-boardRAM.50or60Hz 
operation 

■ Inverse video selection 
standard 



■OlllESI'EH ll|ii;illl 
Si|sfi:ms 

SUBSIDIARY OF WESPERCORP 



Submitting an article to MICRO? 

The following tips will help both you and our staff: 

Text 

• Send typewritten, double-spaced copy. 

• Put your name and address on the first page of the 
article, and name on each page. 

• Provide a summary of the article, and a brief 
biographical note. 

• Use tables and figures — they're not only effective, 
but add visual interest to your article. 

Listings 

Make sure printed listings are: 

• machine generated 

• black ink on white paper 

• commented 

• thoroughly tested 

We'd appreciate listings on magnetic media. 
Please provide: 

• BASIC and binary files 

• assembler source files 

• specifications and loading instructions 

Write for a copy of our Writer's Guideline. 
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$345.00 



AVAILABLE AT ALL FINE COMPUTER STOR: 



* 



SYM-1/KTM-2 Enclosure 




ENCLOSURE FEATURES: 

• Low Profile Design: 18.5 m. Wldex 16 
in. Deepx4.5m.High 

• 060 Aluminum • Durable Charcoal 
Texture Finish • Walnut Finished Side 
Panels • Hinged Top • Rear Panel. 
Power & I/O • Simple Assembly S 
Instructions 



ENCLOSURE INCLUDES: 

• Keypad Access Cover • Rubber 
Feot • Fuse and Fuse Holder • Power 
On Switch • Terminal Strip • AC Outlet 



MOUNTING PROVISIONS FOR: 

■ SYM-1/KTM-2 • Add-on Memory 
Boaid • Cooling Fan • (2) DB25 
Connectors (RS 232) • Video Jack 



$95.00 



KEN-WAY PRODUCTS 83lPanonRd.,Ns«Biigmon. Minnesota 55112 



OSI COMPATIBLE PRODUCTS 

56K 2-MHz Ultra Low Power CMOS Static Memory Board .... MEM-58KS850 



48K $750 
32K S550 
24 K S450 
16K $350 
8K $250 
4K S200 

$24 

■P SI20 

•T S 25 

•PT5125 



WHICH EDITING "SMART-TERMINAL" MONITOR ROM 
IS BEST FOR YOUR C1 P?* 



Partially Populated Boards (Specify address locations required) — MEM 
MEM Board uses the new 2K-Byte Wide Static BAM chips which are MEM 
27 l 6 EPROM compatible. Any 2K byte memory segment can be MEM 
populated wit h RAM or EPROM (or lett empty fo» use ot AddressSpace MEM 
by another board). Fully expandable to any memory size you will ever MEM 
need. No special addressing requirements, )ust solder in extra sockets^-, MEM 
and add memory. Also has space for a 1.75K Monitor ROM at SF800 (FC). 
Extra 2K RAM Memory Chip 
Optional Parallel Printer Port 
Optional Calendar/Clock (Software available in EPROM) 
Both option* (Disk software mods provided for use ot 6522 VIA on 
printer). 

EXAMPLE USES: 

C4P&C8P: Expansion to 40K RAM of Basic workspace. 

Parallel Printer Port — Reserve Serial Port for MODEM 
Calendar/Clock Displaying on unused portion ot screen. 
Space for 5.75K of Enhanced System Monitor EPROMS. 
All of this on 1 Board, using only one of your preciousslols.SoltwareforEnhancedSystem 
Monitor capabilities is continuously being developed and improved As new EPROM 
Monitors are available, you may upgrade to them for any price differential plus a nominal 
$10 exchange fee Another possibility is to fill any portion ot the memory with Basic 
Programs in EPROM lor Power-on Instant Action. This custom EPROM programming 
service is available at S25 per 2716 (includes EPROM) Extra copies at S15 for each 
EPROM 
C4P-MF & C8P-DF: Memory expansion to 48K. 

Add 4KMemory at SE000 for special software requirements. 
Parallel Printer Interface and/or Displaying Calendar/Clock. 
Add 1 75K Enhanced System Monitor ROM. 
C3: up to 58K of Memory Expansion — can be addressed for Multiuser. 

(Optionally, each user can have his own Dedicated Printer Port). 
Add Enhanced Monitor ROM with Calendar/Clock software, warm 
start and Hard Disk Bool 
IEEE-488 INTERFACES AND SOFTWARE: 

The General Purpose Instrumentation Bus (GPIB) Controller interface is 
available for all OSI Computers. Machine code GPIB Drivers are linked to Basic 
to provide easy control of IEEE-488 instruments which is equal to the best of 
Hewlett-Packard Controllers and far superior to most others. Basic Commands 
for Serial Poll. Parallel Poll. IFC Clear, full Local/Remote Control. Respond to 
SRO Interrupts. Send Trigger, do Formatied Input/Output, Direct Memory 
Input/Output and MORE. Interface includes IEEE-488 Ribbon Cable/Con- 
nector. 
GPIB Controller Interface for C2. C3. C4 and C8 Systems GPIB 4-488 S395 

GPIB Software for OS-65D (Add -8 for 8" or -5 for 5") GPIB 488-D S 70 

GPIB Software lor OS-65U GPIB 488-U StOO 

GPIB Software on two 2716 EPROMS for ROM based syslems GPIB 488-R S100 

Add Optional Parallel Printer Interface to GPIB 4-488 -PS120 

Add Optional Calendar/Clock to GPIB 4-488 -T $ 25 

Add 2K RAM to GPIB 4-488 (Specify location. S4000-SBFFF & SDOOO-SEFFF available) -M $ 25 
Software lor EPROM Programming. Reading. Verifying, and Erased Check; lully 
Integrated with Assembler. Editor and Extended Monitor. Can be used with many types 
of EPROM up to 8K. Requires Optimal Technology Model Ep-2A-79 EPROM Programmer 

and the GPIB 4-488 Board. Specify 8' or 5' Disk EPROM MI-EPS180 

GPIB Controller for C1P. Includes Software. Clock & space for 6K EPROM 

GPIB 6-488R $395 

Add Optional Parallel Printer Interface to GPIB 6-488R -P S1 20 

EPROMS: (Chock with your Dealer for newest EPROM Products). 
C1P ROM with 48 Col Display. Smart Terminal. Edit & More tor Series 

ROM-TERM II $59.95 

C1P ROM with 24 Col Display. Other ROM-TERM II Features & Disk 8oot 

ROM-TERM $59.95 

Just flip switch lor SerialorVideoSvstemwithCorrected Keyboard SYNKEY$39.95 

ENHANCED MONITOR ROMS FOR USE ON GPIB 4-488 & MEM BOARDS: 
Expanded Support for C4P A C8P Featuring Calendar/Clock, Line Edit. Smart Terminal, 

Memory Files. Parallel Printer Control & More MI48P1 $59.95 

DlakSupport with Calendar/Clock. Warm StartandCorrected Keyboard — MI4801 $59.95 
Expended C3 Monitor with Calendar/Clock Software. Hard Disk Boot, Line Edit and Warm 

Start MIC3-1 $59.95 

CI P Series II Computer with ROM-TERM 11 Smart Terminal Monitor(Order Direct) . . . $549.0( 





POM-TERM 



ROM-TERM II 



FEATURES AVAILABLE ON BOTH ROMS AT THE TOUCH OF A KEY: 

• Enter "Smart Terminal" moae tor communications with a time share Dial-up computer 
network 

• Select halt-duplex/lull-duplex operation. 

• Select auto or manual line feed at carnage return 

• Transmit a pre-preoared memory file from CiP to remote computer This memory tile 
can be a message letter or program and is sent at lull speed — saving time and 
telephone expense. Programs can be listed lo memory Me while m basic 

• Receive a message or program (or all transact iC'Si into a memory lile lor later review 
on video recording on tape ana printing. The lite can be downloaded to basic after you 
exit the "smart terminal" mode 

e Uploading/downloading ol programs can be done m Ihis memory hie manner or 
directly into basic by using a new senai output distributor and a new "Controt-L" 'oad 
command 

• Return to basic program operation at the same pomi o' execution from which you 
entered the "smart-terminal" mode 

• "Smart-Terminal" mode can be utilized with the modem/telephone disconnected in 
order to prepare memoryliles type directly to serial printer send memory (lies to printer 
or tape ana to view tapes without interference from basic "Syntax Error" 

• The serial output distributor can be turned on and off with a "controls" keystroke or with 
a poke which allows easy control of a serial printer Irom basic. 

• Basic program lines can be recalled, edited and reentered The editing includes 
backspacing, forward spacing, deleting, typing over, inserting new text, and 
changing line » (duplicating a line) During editing, the cursor position and display are 
wrapped around, allowing operation on and displaying of an entire line up to 72 
characters long The preparation of line numbered messages can utilize these features 
— extremely handy for poor spelling, typists like me' 

• Keyboard has been completely corrected to provide standard typing formal By the 
use of the control and repeat keys as modifiers, any character in th.e Kill USASCll 1 28 
character set can be entered Irom the keyboard. This will give you all the 
characters you need lor running Pascal and other high level languages In a remote 
computer. 

• Video output may be halted at any time for easy viewing 

• Screen clear at keystroke. 

ALL FEATURES ARE ROM RESIDENT AND ALWAYS AVAILABLE AT POWER ON. 

ADDITIONAL FEATURES PROVIDED IN THE ROM-TERM: 

• Disk bootstrap — In disk operation you can alternate between ROM Basic and Oisk 
Basic with a keystroke Can Warm Start Disk Basic. 

• Easy transfer of programs between disk and ROM Basic (Use the ROM Basic for editing 
disk basic programs.! 

• Memory files can be stored or recalled in Disk Basic, ROM Basic or the "Smart 
Terminal" interchangeably 

ADDITIONAL FEATURES PROVIDED BY ROM-TERM II 

• A 48 column videodisplay on series 1 1 C 1 P (Revision "D" Superboard). Selection ot 48 or 
24 column video with a "Control-V" keystroke. Corrected "Syntax Error" messages 

•RECOMMEND THE ROM-TERM II FOR NON-DISK OPERATION OF SERIES II CI P (OR 
REVISION "D" SUPERBOARD) AND THE ROM-TERM FOR ALL OTHER SYSTEMS. 



MEM-56K CMOS STATIC MEMORY BOARD 



Enhanced 
Monitor Rom 




ULTRA-LOW POWER — By using CMOS Static 
RAM Memory, the total power consumption is about 
'6 Ampal 5 Volts when populated tor 48K. In fact, most 
of power is used by the Address Line Buffers and the 
Data Transceivers. 



MULTI-USER — Can be addressed for any of the 16 
multi-user memory partitions. The low power and 
single memory board/partition simplify installation 
and provide a typical $1400 saving for a 3-user 
system. 



Standard 
Bus 



MICRO-INTERFACE 

3111 SO. VALLEY VIEW BLVD., SUITE 1-101 

LAS VEGAS. NEVADA 89102 

Telephone: (702) 871-3263 



Check with your local Dealer or Order Direct 

phone orders accepted. 

TERMS: Check/Money Order/Master Charge/VISA 

Sent POSTPAID ON PREPAID ORDERS. 

Foreign Orders: Prepaid only. 

Add 5% tor handling/shipping. 
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A 

ATARr 



Computers 
for people: 




800 TM $ 699 



'TM 
410 Recorder 
810 Disc Drive 
822 Printer 
825 Printer 
830 Modem 
820 Printer 
850 Interlace 
New DOS 2 System 
CX70 Light Pen 
CX30 Paddle 
CX40 Joy Stick 
CX853 I6K RAM 
Microtek 16K RAM 
Microtek 32K RAM 
One year extended warranty . 



iiriini'.v I ! "iiiiiiiiu 



ATARI 400 



S59 00 

$444 00 

$359 00 

$629 00 

$159 00 

$269 00 

$159 00 

$21 00 

$64 00 

$1800 

$1800 

$89 00 

$75 00 

$169 00 

. . $50.00 




$329 
$478 

$555 



Intec 48K Board $249 



ATARI SOFTWARE 

CX404 Word Processor 

CX404 PILOT 

CX413 Microsoft Basic 

CX4101 Invitation To Programing I 

CX4102 Kingdom 

CX4103 Statistics 

CX4104 Mialing List, 

CX4105 Blackiack 

CX4106 Invitation to Programing 2 

CX4107 Biorythm 

CX4108 Hangman 

CX4 109 Graph It 

CX41 10 Touch Typing 

CX4111 SPACE INVADERS 

CX4i 12 States 8 Capitals 

CX41 U European Countries & Capitals 

CX41 15 Mortgage & Loan Analysis 

CX41 16 Personal Fitness Program 

CX4 1 1 7 Invitation To Programing 3 

CX4 1 18 20 Conversational Languages tea t 

CX4121 Energy C*ar 

CXL4001 Educational Master 

CX6001 17 Talks Teach Series tea i 

CX8106 Bond Analysis 

CX8107 Stock Analysis 

CX8101 Stock Charting 

CXL4002 Basic Computing Language 

CXL4003 Assembler Editor 

CXL4004 Basketball 

CXL4005 Video Easel 

CXL4006 Super Breakout 

CXL4007 Music Composer 

CXL4009 Chess 

CXL4010 3DTicTacToe 

CLS401 1 STAR RAIDERS 

CXL4012 MISSLE COMMAND 

CXL4013 ASTEROIDS 

CXL4015 TeleLink 

Visicalc 

Letter Perfect (Word Processor) 
Source 



$119 00 
$68 00 
$68 00 
$17 00 
$1300 
$1700 
$17 00 
$1300 
$20 00 
$13 00 
$13 00 
$17 00 
$20 00 
$17 00 
$13 00 
$13 00 
$13 00 
$59.00 
$20 00 
$45 00 
$1300 
$21 00 
$23 00 
$20 00 
$20 00 
$20 00 
$4600 
$46 00 
$24.00 
$24 00 
$30 00 
$45 00 
$30 00 
$24 00 
$39.00 
$3200 
$32 00 
$20 00 
$149.00 
$109.00 
$8900 



Cf commodore 




CBM 8032 $1149 

4016 $79900 

4032 $999 99 

8096 $1795 00 

CBM4022 Printer $629 00 

Tally 8024 $1699.00 

C8MC2N Cassette Drive $69 00 

CBM4040 Dual Disk Drive $1039 00 

CBM805O Dual Disk Drive $134900 

CBM 2031 Single Disc Drive $525.00 

CBM 8300 Letter Quality Printer $1799.00 

CBM 8023P 132 Column Printer $799 

SOFTWARE 

WordPro3 Plus $229 00 

WordPro4 Plus $329 00 

Commodore Tax Package $399 00 

Visicalc $14900 

BPI General Ledger $329 00 

OZ2 Information System $329 00 

Dow Jones Portfolio $129.00 

Pascal $239 00 

Legal Time Accounting $449 00 

Word Craft 80 $289 00 

Create-A-Base $24900 

Power $89 00 

Socket 2 Me $20 00 

Jmsam $Call 

MAGIC $ Can 



i 1,1,1,1,1,1,1 



d^He 



•v 



VIC 20 $259 

Vic TV Modual $19 00 

Vic Cassette $6900 

Vic 6 Pack Program $44 00 

VIC1530 Commodore Datassette $69 00 

VIC'1 540 Disk Drive . $49900 

VIC1515 VIC Graphic Primer $39900 

VIC1210 3K Memory Expander $32 00 

VIC1 1 10 8K Memory Expander . $53 00 

VIC 1011 RS232C Terminal Interlace $43 00 

VIC11 12 VIC IEEE 488 Interlace $86 00 

VIC1211 VIC 20 Super Expander $53 00 

VIC1212 Programmers Aid Cartridge $45 00 

VIC1213 VICMON Machine Language Monitor $45 00 

VIC1901 VIC AVENGERS $23 00 

VIC1904SUPERSLOT $23.00 

VIC1906 SUPER ALIEN .. $19 00 

VIC1907 SUPER LANDER $23 00 

VIC1908 DRAW POKER $23 00 

VIC1909 MIDNIGHT DRIVE $23 00 

VT106A Recreation Pack A $44.00 

VT107A Home Calculation Pack A . . ... $44 00 

VT164 Programmable Characler'Gramegraphics $12.00 

VT232 VICTerm I Terminal Emulator . $900 



ra 



HEWLETT 
PACKARD 




HP*85$2595 

NEW' HP«125 $3295 00 

HP«83 $1795 00 

HP-85 16K Memory Module . . . $249 00 

5% " Dual Master Disc Drive $2129 00 

Graphics Plotter {722581 $2079 00 
Call for HP Software Prices & Information 
Call for Calculator prices 



H-nTi Texas Instruments 




TI-99/4A $379 

PHC 004 TI-99/4 Home Computer $399 00 

PHP 1600 Telephone Coupler $169 00 

PHP 1700 RS-232 Accessories Interface $169 00 

PHP 1800 Disk Drive Controller $239 00 

PHP 1850 Disk Memory Drive . $389 00 

PHP 2200 Memory Expansion (32K RAMI $239 00 

PHA 2100 R.F Modulator $43 00 

PHP 1 100 Wired Remote ControllersfPairl $31 00 

PHM 3006 Home Financial Decisions $26 00 

PHM 3013 Personal Record Keeping $43 00 

PHD 5001 Mailing List $60 00 

PHD 5021 Checkbook Manager $18 00 

PHM 3008 Video Chess .. $60 00 

PHM 3010 Physical Fitness $26.00 

PHM 3009 Football $26 00 

PHM 3018 Video Games I $26 00 

PHM 3024 Indoor Soccer $26 00 

PHM 3025 Mind Challengers $22 00 

PHM 3031 The Attack $35 00 

PHM 3032 Blasto $22 00 

PHM 3033 Blackiack and Poker $22 00 

PHM 3034 Huslle . $22 00 

PHM.3036 Zero Zap $18 00 

PHM 3037 Hangman $18 00 

PHM 3038 Connect Four $18 0Q 

PHM 3039 Yankee $22 00 

PHM 3017 Terminal Emulator I $3900 

PHM 3026 Extended Basic $8800 

PHM 3035 TerminDl Emulator II $45 00 



Call for the best prices on 

PRINTERS 

by Epson, Diablo, TEC and Tally. 

DISKS 

by Atari and Maxell. 



NO RISK » NO DEPOS1TON PHONE, C.O.D. OR CREDIT CARD ORDERS. 



computer mail order 



east 
800-233-8950 

501 East Third Street 
Wllllamsport, PA 17701 
(717)327-9575 



OVER 40 YEARS EXPERIENCE IN SOPHISTICATED ELECTRONICS 



HOW TO ORDER: " sr 

Phone orders Invited or send check or money order and receive 
tree shipping In the continental United States. PA residents add 
6% sales tax. Add 3% for VISA or MC. Equipment subject to price 
change and availability without notice. 



west 
800-648-335I 

P.O. Box 6689 
State Line, Nevada 89449 



/AlCftO 

From Here to Atari 



Jim Capparell 

297 Missouri 

San Francisco, California 94107 



This month I'm going to talk about the 
vertical blank (Vblank) interrupt. I will 
give you a working definition of what 
an interrupt is, then discuss how 
Vblank fits into the overall interrupt 
structure, what is accomplished in this 
time period, and how programmers may 
access this interrupt for their own use. I 
will also provide a simple program to il- 
lustrate the use of Vblank vectors and 
how to insert code at VVBLKD. 

Recall last month, in my discussion 
of raster scan graphics, that the term 
vertical blank is given to that time 
period when the electron beam is turned 
off and returned to the upper left corner 
of the video screen, ready to start trac- 
ing a new frame. The number of ma- 
chine cycles available at Vblank is 
some fraction of 29868 machine cycles 
that arc needed to trace one entire 
television frame. In the normal gra- 
phics (text screen), approximately 
7980 machine cycles are left over at 
Vblank to be shared by the Operating 
System Vblank interrupt service rou- 
tine (ISR) and any programmer supplied 
code. The term interrupt applies to any 
signal, originating from hardware or 
software, which serves to suspend nor- 
mal mainline program flow. 

When an interrupting event occurs, 
the program counter (PC) and processor 
status registers are automatically saved 
on the system stack. The processor 
then executes special code referred to 
as an interrupt service routine (ISR). 
The address of the ISR is found in a 
memory location reserved for this pur- 
pose, called an interrupt vector. When 
the ISR is finished, the values of the PC 
and status registers are retrieved from 
the stack and processing of the sus- 
pended program is resumed as if nothing 
had intervened. This all happens at 
machine speed — in hundreds of 
microseconds. 



The vertical blank interrupt is an 
essential part of the Atari operating 
system and appears as a non-maskable 
interrupt |NMI) to the system. The 
NMI is only one of three possible inter- 
rupts that the Atari can process. These 
three, chip reset, NMI, and IRQ, are 
analyzed further by interrupt service 
software. Whenever an NMI or an IRQ 
signal occurs, the appropriate service 
routine is executed. These service rou- 
tines interrogate a status register to 
isolate the interrupting source. See 
table 1 for a breakdown of vectors and 
contents for each type of interrupt. 

It's apparent from table 1 that all 
NMI interrupts are vectored through 
location SFFFA to the NMI interrupt 
service routine (ISR) starting at address 
SE7B4. Since there are three possible 
causes of an NMI, the ISR must deter- 
mine the source of the interrupt by in- 
terrogating an NMI status register at 
address $D40F. This location, called 
NMIST in the documentation, has bit 7 
set when a DLI occurs, bit 6 set when a 
Vblank occurs, and bit 5 set when the 
system reset button has been pressed. If 
neither a DLI nor a system reset caused 
the NMI, then a Vblank interrupt is 
assumed by the ISR and the processor 
jumps to the address contained in the 
vector at $0222. 



There are actually two vectors used 
by Vblank through which a program- 
mer may introduce additional or re- 
placement code. One vector, referred to 
as vertical blank immediate vector 
VVBLKI, is at address $0222. This vec- 
tor normally contains the address 
$E7D1, the start of the system Stage 1 
Vblank ISR. Should it be necessary to 
either replace system functions or 
simply perform operations prior to the 
system code, then you would use this 
vector. The other vector location, called 
vertical blank deferred VVBLKD, is at 
address $0224. This vector normally 
contains the address $E93E, which is 
the start of code for the system return 
from interrupt. The contents of $0224 
would be changed to point to new code 
when your operation was needed after 
system housekeeping was accomplished. 



The Vblank process is actually 
divided into two stages. Whenever a 
Vblank NMI occurs, the following 
events always happen: 

1. Processor registers A, X, and Y are 
pushed on stack. 

2. Interrupt request is cleared by 
writing zero to $D40F. 



Table 1 








INTERRUPT VECTOR ISR LOCATION 






CHIP RESET FFFC E477 




NMI FFFA E7B4 








Display list Jump through 


0200 






Vertical Blank 


0222 and 


0224 




S/Reset key 


E474 






IRQ FFFE E6F3 








Serial bus output reads jump 


through 




020C 


serial bus output conplete 






020A 


Serial bus input ready 






020E 


xSerial bus proceed line 






0202 


xSerial bus interrupt line 






0204 


xPokey tiner 1 






0210 


xPokey tiner 2 






0212 


xPokey tiner 4 (Bug in O.S. tiner 4) 




0214 


Keyboard key scan 






0208 


Break key 






???? 


X6502 break instruction 






0206 


* These vectors are unused by th 


a O.S. 3 n c 


ar€ 


initialized to 


point to an RTI instruction. 
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0000 
060 68 
0401 A907 
0603 A206 
0605 A010 
0607 205CE1 
060A 60 



060B 




0610 


A600 


0612 


A100 


0641 


E8 


0615 


EC2006 


0618 


F003 


064A 


18 


061B 


90F7 


061D 


C8 


061E 


CC2006 


0651 


F003 


0653 


18 


0651 


90EE 


0656 


1C3EE9 



10 
20 
30 
40 

50 



60 
70 

80 

90 

0100 

0110 

0120 

0130 

0110 

0150 

0160 

0170 

0180 

0190 

0200 

0210 

0220 

0230 

0210 

0250 

0260 

0270 

0280 

0290 

0300 

0310 



; «* PROGRAM EXAMPLE 1 xx 

', PROGRAM SETS UP A VVBLKD ISR 



SET UP NEW VECTOR WITH A BASIC USR CALL A=USR(1536) 
NEED TO DO THIS WHENEVER SYSTEM IS RESET. 



*600 



*7 

*06 
#«10 
♦ E15C 



x= 

PLA 

LDA 

LDX 

LDY 

JSR 

RTS 

; XX XX XX XX 

; ROUTINE AT DECIMAL 
t PUT A NUMBER FROM 1 
! USE POKE 1568.N 
! THIS IS THE ISR 

x= $610 

LDX 



WHI 



LOOP1 



LOOP2 



EXIT 



LDY 
INX 
CPX 
BEQ 
CLC 
BCC 
INY 
CPY 
BEQ 
CLC 
BCC 
JMP 






$620 
L00P2 

LOOP1 

$620 
EXIT 

LOOP1 
*E93E 



PUT IN PAGE 6 DECIMAL 1536 
NULL VALUE FROM BASIC 
INDICATOR FOR VVBLKD 
HIGH BYTE FOR VECTOR ADDR 
LOW BYTE FOR VECTOR ADDR 

SET UP DEFERRED VECTOR 
RETURN TO BASIC 

1600 IS DESIGNED TO WASTE TIME, 
- 5 IN DECIMAL 1568. 

CH SIMPLY WASTES TIME. 

INIT COUNTERS 

INCR COUNT 
DELAY VALUE 

FORCE BRANCH 



DELAY VALUE 
DONE ? 
NO-FORCE BRANCH 

TAKE NORMAL VBLANK EXIT 



COLOR VIDEO MONITORS 

• COMPOSITE VIDEO INPUT, NTSC: 
TC-700 13" color monitor/TV receiver, 
switchable. S399.00. TC-900 19" mon- 
itor/TV receiver, $495.00. 

• Sony TV to video monitor conversion 
kit, MCK-100;opto-isolator input, $135.00. 

• RGB VIDEO MONITORS: Analog or 
TTL drive, 380 x 350 resolution. 

13" CRM-13 $485.00 
19" CRM-19 $575.00 
15" Trinitron, 3 modes, RGB, compos- 
ite video, TV. $1095.00, CM 15 RGB. 

• RGB converter board for Apple 11, 
provides RGB video and sync; mod. 
VCB-A2. $179.00. 

• Sony TV to RGB and composite video 
monitor conversion kit, RGB-100: 
$295.00 (available January 1982). 

For additional information, contact: 

P.O. Box 339 

Warrington, PA 18976 

(215) 343-3000 

DEALER INQUIRIES INVITED 



3. lump through VVBLKI normally 
pointing to Stage 1 Vblank. 



When Stage 1 processing is ex- 
ecuted, it increments the three-byte 
counter called RTCLOK at addresses 
$12, $13, and $14. Location $12 is the 
most significant byte. This counter 
wraps to zero after approximately 77 
hours and then continues counting. 
The attract mode is also processed at 
Stage 1; that is the process which 
causes the colors on your screen to start 
shifting if no key has been pressed on 
the keyboard in the previous nine 
minutes. 



Additionally, system timer 1 at 
locations $218 and $219 is decre- 
mented if it is non-zero. When the 
counter goes to zero, an indirect JSR is 
performed via a vector at addresses 
$226 and $227. Note that an indirect 
JSR is performed by copying the address 
from the vector to the stack and ex- 
ecuting an RTS instruction. 



At this point a test is made to deter- 
mine if a time-critical section of code 
was interrupted. If either the I bit in the 
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processor status register or the critical 
flag at address $42 are set, then the in- 
terrupted code is assumed to be time- 
critical. When this occurs, the registers 
are restored and an RTI instruction is 
executed. 



The critical flag can be set by a 
Serial I/O in progress. If no time con- 
straints are present, then Stage 2 pro- 
cessing is begun. It is in this section of 
code that IRQ interrupts are enabled, 
keyboard auto repeat logic is processed, 
keyboard debounce is performed, and 
system timers 2, 3, 4, and 5 are pro- 
cessed. In addition, the color data for 
playfield and player/ missiles are up- 
dated. This color data and other RAM 
locations, called shadow registers, are 
copied into their associated hardware 
locations. Stage 2 also reads the game 
controller data from Jacks 1, 2, 3, and 4 
into RAM memory. 



To insert code either at VVBLKI or 
VVBLKD, the address where the new 
code resides must be placed into the 
appropriate vector. A system routine is 
provided at $E45C. This routine in- 
sures that both bytes of the vector will 
be updated while Vblank is enabled. A 
vertical blank can be processed during a 
call to this routine. The routine is called 
SETVBV in the documentation and the 
calling sequence is: 

reg A (update indicator! 

= 1-5 then update timers 1-5 

= 6 for immediate Vblank 
vector VVBLKI 

= 7 for deferred Vblank vec- 
tor VVBLKD 

reg X = Most Significant Byte of 
vector address 

reg Y = Least Significant Byte of 
vector address 

JSR SETVBV Jump to subroutine 

The A, X, and Y registers may 
be altered. 

The display list interrupt will 
always be enabled on return. 

A knowledge of processing inter- 
rupts and inserting code at interrupt 
vectors is essential to get the most from 
the Atari. With this example you 
should have enough information to ex- 
periment with the Vblank vectors. 
Interrupt-driven sound control, page 
flipping, animation techniques, greater 
color control, and many other pro- 
cedures are possible. 

mono 
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List Scroller 



This program lets you scroll 
forwards or backwards through 
a listing to view any part of a 
BASIC program without requiring 
a series of keyed LIST 
commands. 



Colin Macauley 

39 Shoalhaven Street 

Werribee 

Victoria 3030 

Australia 



The problem with editing a BASIC pro- 
gram is that a LIST only displays a 
small "window" of your program. 
Often you wish to view outside this 
window, which requires a further LIST. 
This can be very frustrating because the 
screen depth never appears to be long 
enough to display all the program lines 
desired, especially on my OSI Super- 
board. Each subsequent LIST scrolls a 
lot, if not all, of your previous listing 
off the screen. 

Word processors have the ability to 
scroll through a document, either for- 
wards or backwards, to allow for oper- 
ator insertions, deletions, etc. My pro- 
gram is similar in operation and allows 
continuous controlled forward or back- 
ward scrolling through a BASIC pro- 
gram after a LIST. 

The keys used are "CTRL-A" for 
backward scrolling and "CTRL-Z" for 
forward scrolling. Holding down the 
keys will allow continuous scrolling 
until the keys are released. The pro- 
gram is located in RAM unused by the 
OSI BASIC interpreter, and is not lost 
by warm and cold starts to the system. 



To use the program, the BASIC input 
vector ($218, $219) must be re-set by 
typing in the following: 

POKE 536,34 POKE 537,2<CR> 

to divert keyboard input through my 
program. Thus, when you want to 
review your own BASIC program, a 
LIST (e.g. LIST 10) should be entered 
and the program listing on the screen 
manipulated, using the CTRL-A and 
CTRL-Z keys. 



Operation of the program is difficult 
to follow unless you are fully conver- 
sant with the storage and tokenizing of 
BASIC program lines, and the routines 
involved in actually running a BASIC 
program. Essentially, the program di- 
rectly manipulates the input buffer to 
cause a serial supply of single line LIST 
instructions to be entered and run 
while the previously described keys are 



depressed. Further information regard- 
ing BASIC operation, with references to 
specific subroutines in the 8K BASIC 
ROMs, may be found in The First Book 
of OSI by Jim Williams and George 
Dorner (Aardvark Technical Services), 
and OSI BASIC in ROM by Edward H. 
Carlson. 



The sample run shows how the pro- 
gram works by scrolling forward 
through a BASIC program until line 150 
(CTRL-Z) and backwards from line 150 
until line 90 (CTRL-A). 



Colin Macauley is a qualified physicist 
and a member of the firm of Callinan and 
Associates, Patent Attorneys. He uses a 
modified OSI Superboard II and is mainly 
interested in utility-type programming. 
His current interest is development of 
software for his brother's minimum chip 
6502-based computer which has software- 
controlled video. 



Figure 1: Sample Run 


I00 FOR R=2 TO STEP -1 

11* FOR M=P1 TO P2:P0KE h.tl:NEXT H 

120 FOR N=P1+R 10 P2 STEP 3:P0KF. H.TtrtEXT « 

130 v=R+I 

140 FOR H=P1 TO P2 

150 V=V-1 

140 FOR H~P1 TO P2 

130 V=R+1 

120 FOR H=Pt+fi TO P2 STEP 3:PQKE H.TrNEXT H 

110 FOR N=PI TO P2:P0KE H.G:NEXT H 

100 FOR R=2 TO STEP -1 

90 FOR H=1 10 2 
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Listing 1 



0222 


•=10222 


0222 


; ENABLE NSG PRINTER 


0222 A94E 


LDA ttt4C 


8224 8503 


SIA *03 


0226 


:GET CHAR. FROM KErBB. 


0226 20BAFF 


JSR tFFBA 


0229 


:CHECK KEY 


0229 C901 


CUP **01 


022B F02D 


BEO UP 


022D C91A 


CMP tt$lfl 


022F F00I 


BEO POUN 


0231 60 


RTS 


0232 


» 


0232 


: SCROLL THRU ASCENDING LINE NO 


0232 8A 


BOUN TXA 


0233 48 


PHA 


0234 98 


TYA 


02.35 48 


PHA 


0236 


ICHECK NEXT PROGRAM LINE 


0236 A000 


LDY HWfl 


0238 BIAA 


LBA (4AA),Y 


023A 


:ENB OF PROGRAM LINES' 


023A C900 


CMP H00 


023C H00E 


BNE BOUNl 


023E 


; NO. BRA TO SET UP SCROLL 


023E Cfl 


INY 


023F BIAA 


LDA (JAA).Y 


0241 C900 


CMP H't00 


0243 D007 


BNE BOUNl 


0245 


:yes,ret. to basic 


0245 68 


BOUN4 PLA 


0246 A8 


TAY 


024? 68 


PLA 


0248 AA 


TAX 


0249 A900 


LDA (B00 


024B 60 


RTS 


024C 


IGET NEXT LINE NU. 


024C A000 


BOUNl LBY BJ00 



024E C8 


INY 


024F C8 


INY 


0250 C8 


INY 


0251 BIAA 


LDA («AA).Y 


0253 48 


PHA 


0254 B8 


OEY 


0255 BIAA 


LDA <»AA).Y 


0257 


;load input buffer 


0257 4CA602 


M? SCRO 


025A 


» 


025A 


;SCROLL IHRU DESCENDING LINE NOS. 


025A 8A 


UP TXA 


025B 48 


PHA 


025C 98 


TYA 


025D 48 


PHA 


025E 


;PUT PRESENT LINE NO. POINTER ADDR. IN 1AA.AB 


025E 2032A4 


JSR *A432 


0261 


;SAOE *AA.AB IN *DC,M 


0261 A5AA 


LDA iAA 


0263 85DC 


STA «DC 


0265 A5AB 


LDA JAB 


0267 85BD 


STA IDD 


0269 A000 


UP3 LDY H«00 


026B B1BC 


LDA (1DO.Y 


026D 


;END OF BASIC PROGRAM LINE? 


026D C900 


CNP H«00 


026F 


;NO, CHECK IF OUT OF RANGE 


026F D019 


BNE UP1 


0271 C8 


INY 


0272 B IDC 


LDA (JDC).Y 


0274 


SSTART OF PREVIOUS LINE' 


0274 C5AA 


CMP *AA 


0276 


;NO. CHECK IF DUT OF RANGE 


0276 D012 


BNE UP1 


027S C8 


INY 


0279 B1DC 


LDA (*DC).Y 


027B C5AB 


CMP JAB 


027D D00B 


BNE UP1 


027F 


;SET UP LINE NO. (Continued) 



Z-FORTH IN ROM by Tom Zimmer 

5 to 10 times faster than Basic. Once you use it, you'll never go back to BASIC! 

source listing add 

OSI FIG-FORTH True tig FORTH model for 0S65D with fig editor named files, string 
package & much more 

TINY PASCAL Operates in fig-FORTH, an exceptional value when purchased with forth. 
TINY PASCAL & documentation 
FORTH & TINY PASCAL 

SPACE INVADERS 100% machine code for all systems with 64 chr. video. Full color & sound 
on C2, 4P & 8P systems. The fastest arcade program available. 

PROGRAMMABLE CHARACTER GENERATOR 

Use OSI's graphics or make a complete set of your own! Easy to use, comes as a kit. 
2 Mhz. boards 



$ 75.00 
$ 20.00 

$ 45.00 



$ 45.00 
$ 65.00 

$ 14.95 

$ 99.95 
$ 84.95 
$109.95 

PROGRAMMABLE SOUND BOARD $ 74.95 

Complete sound system featuring the AY-3-8910 sound chip. Bare boards available. $29.95 

32/64 CHARACTER VIDEO MODIFICATION $ 39.95 

Oldest and most popular video mod. True 32 chr. C1P, or 32/64 chr. C4P video display. 
Also adds many other options. 

ROMS!!! 

Augment Video Mod with our Roms. Full screen editing, print at selectable scroll, disk support and many more 
features. Basic 4 & Monitor $ 44.95 

Basic 3 $ 18.95 

All 3 for $ 59.95 

65D DISASSEMBLY MANUAL, by Software Consultants First Class throughout. 

A must for any 65D user. $ 25.95 

NUMEROUS BASIC PROGRAMS, UTILITY PROGRAMS AND GAMES ALONG WITH HARDWARE PROJECTS. ALL 
PRICES ARE U S FUNDS. Send lor our $1.50 catalogue with free program (hardcopy) Memory Map and Auto Load 
Routine. 





3336 Avondale Court 

Windsor, Ontario, Canada N9E 1X6 

(519) 969-2500 

3486 Countryside Circle 

Pontiac Township, Michigan 48057 

(313) 3730468 




58 



MICRO - The 6502/6809 Journal 



No. 44 -January 1982 



Listing 1 (Continued) 


027F C8 


INY 


1280 C8 


INY 


8281 B1DC 


LDA <*DC),Y 


1283 48 


PHA 


0284 88 


DEY 


1285 B1DC 


LDA <»DC),Y 


8287 


;LOAD INPUT BUFFER 


3287 4CAA02 


JMP SCRO 


828A 


{TEST FOR OUT OF RANGE IE BELOU 102FF 


I28A ASDD 


UP1 LDA *DD 


828C C982 


CUP »*82 


828E D089 


BNE UP2 


1298 A5DC 


LBA $DC 


•292 C9FF 


CI1P H*FF 


•294 D003 


BNE UP2 


8296 


;YES,RET. TO BASIC 


8294 4C45B2 


JNP D0UN4 


•299 


;BUHP SEARCH ADHR. 


8299 CADC 


UP2 DEC «DC 


8298 A5DC 


LDA JDC 


829D C9FF 


CHP ItlFF 


829F D8C8 


BNE UP3 


82A1 C6DD 


DEC *DD 


82A3 


;LOOP TO FIND END OF LINE 


82A3 18 


CLE 


B2A4 98C3 


BCC UP3 


82A4 


; 


82A4 


:loab input buffer 


82A4 


;LINE NO. LO IN Y, HI IN A 


B2A4 A8 


SCRO TAY 


82A7 48 


PLA 


82A8 


:CQNVERT TO FLOATING POINT 


82A8 20CIAF 


JSR 1AFC1 


82AB 


{CONVERT TO ASCII STRING 


82AB 284E69 


JSR 1B96E 


82AE 


;SET UP POINTERS TO *BC ROUTINE 


02AE A9I2 


LBA 11*12 


82B0 85C3 


STA *C3 


82B2 A988 


LDA 11*88 


82B4 85C4 


STA *C4 


82B.1 


ILIST token 


02B4 A999 


LDA K*99 


02B8 8513 


STA *13 


82BA A200 


LBX 1*10 


82BC 


;ASCTI STR1N6 TO BUFFER 


026C BB818I 


DOUN3 LDA J810I.X 


82BF C908 


CMP HS00 


82C1 F004 


BEI) D0UN2 


02C3 9514 


STA *14,X 


02C5 E8 


1NX 


82C4 18 


CLC 


02C? 90F3 


BCC D0IM3 


02C9 


: INSERT NULL 


B2C9 9514 


D0UN2 STA «14,X 


02CB 


IDISABLE rtSG. PRINTER 


82C6 A948 


LDA M40 


B2CD 8503 


STA *03 


02CF 48 


PLA 


02D0 A8 


TAY 


82B1 48 


PLA 


02D2 AA 


TAX 


02B3 84BC 


3TX »DC 


02B5 


{RESTORE SP TO AVOID STACK QVERFLOU 


02D5 A2FC 


LDX MFC 


82D7 9A 


TXS 


02B8 A5BC 


LDA *DC 


02BA AA 


TAX 


82DB 


[BASIC EXECUTION ROUTINE 


02BB 4CF4A5 


JNP JA5I-4 



JUCftO 



PANORAMAS! 











JBB. 

1111 
■ III 
.•■■I 
■ araa 

jai iat 

■ ■' IBB 
IBB BB, 
JBP IB! 
••■■•■■> 


BB 

■a 
aa 
aa 
aa 


Mr 'BBi 
■■' 1* 

■■ IB 

■■ 

■B 

BB BBBBB 

•■ BBBBB 

BB BB 

BB. jar 


•••■■■111 

■a "*B» 

■■ BB 
IB BB 

■■ jar 


■aaai 

■a ■ 

■a 

■a 

■ a 

■a 
■a 


!■■■' 

■at 

IBB, 

• BB 

'ant 
iaa. 

BBB 

JB 
IB 
■ ■ 
II 
■ II 

■■* 

JBB 
IBi 

aaai 


■BBBBB 

aaaaaB 

BB 

i: 

■ a 
■■ 

Amur 


IBB. jBB' 
«■■■■■■' 

-*BBP'- 


Si! 

Jim 

BB' 

a. 
at 

BB 

iii 
iat 

IBB 
BB. 
VBI 

aaaa 


BIL 
1*1 

IBB 

■ ■ 

BB 

aa A 

BBJBI 

BBHiir 

•»r 

BBBk. 

■ ■■■> 

aaiai 

BB 11 

aa « 

aa 

aa 


il 

■ ■ 

■ B 
■■ 


■■ 

aa 
jar 


■ ■r 

ar 

r _ 

at 


:: 

:■; 

aa 




k 

Bk. 


<BI 


■ ■'i 
1B1 

IBB 


Ill 

^BBk 



Reproduce either Page 1 or Page 2, hori- 
zontally or vertically on the paper; or, 
reproduce both as a two page panorama 
with both pages butted in perfect regis- 
tration. 

Compose your picture by framing, crop- 
ping, positioning, window-erasing, and 
adding text annotation (upper/lowercase, 
punctuation, numerals and expanded 
symbology) in all four directions. 

GRAF-PAK imposes no scale factor limita- 
tions: if it will fit on the paper, GRAF-PAK 
will reproduce it. GRAF-PAK displays the 
available scale factors, which depend 
only on your printer dot density, paper 
width and chosen cropping boundaries. 

Eleven pages of Instructions, Examples and 
Pictures! 



PRINTERS 


POST-PAID 


SUPPORTED 




PRICE 


EPSON MX70/80/100 




S34.95 


IDS440G/445G 




34.95 


460G/560G 




39.95 


ANADEX DP9000 thru 




39.95 


DP9501 






NEC PC 8023 




34.95 


3510/3520/3530 




39.95 


5510/5520/5530 






7710/7720/7730 






SmartWare 




2281 Cobble Stone Court 


Dayton, Ohio 


45431 
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Speed 
Power 
Efficiency 



for 



OSI 

65 D3 SYSTEMS 



FBASIC: BASIC Compiler $155/$10 

• FAST efficient machine code written 
with the ease of BASIC. 

• SPEED-optimized, native-code compiler. 

• INTEGER subset of OSI-supplied BASIC. 

• DISK based: No problem with size of 
source or object files. 

• EXTENSIONS to BASIC: 

- Simple interface to system hardware 
and software. 

- Direct access to 6502 registers. 

- Array initialization. 

- Optional absolute array locations. 

- WHILE and other structures. 

- Simple technique for combining 
compiler and interpreter advantages. 

• FULL system: utilities (plus source), 
manual, and many useful examples. 



R-EDIT: Edit any program 
or text with ease! 



$40 



FULL CURSOR control. Edit anywhere on 

the screen. 

INSERT, replace, add, delete. 

ONE KEY stroke and you're editing. 

BASIC, assembler, etc. can all be 

edited without reloading editor. 

RAM- resident: Always ready! 

SYSGEN relocates R-EDIT and customizes. 



SPUL-65: Printer Spooler $95/$10 
Virtual Indirect File 

• STOP WAITING for your printer! 

• PROCESS words, write programs...all 
while printing! 

• QUEUE lets you pile on print jobs. 

• MULTIPLE COPIES printed with top and 
bottom page margins. 

• SYSGEN relocates SPUL65 and gives 
extensive customization. 

• INDIRECT FILE commands produce disk 
files giving you: 

- A virtually unlimited temporary file. 

- A link between incompatible files; 
for example, use WP-2 for extensive 
BASIC editing. 

- Ability to merge multiple program 
segments. 



XREF: BASIC Cross Referencer $25 

• TABULATES: 

- Referenced line numbers. 

- Variable names (numeric, string, 
array). 

- Defined functions. 

• FAST machine language program. 

• DISK based: Handles large BASIC source 
files on any drive. 




'ware 



CP/M to OSI Disk Translation 

Frustrated by all those good CP/M disks 
that won't run on your OSI CP/M system? 
It's that special OSI disk format! And 
we can fix that. Just send us your disk, 
$15, and you'll soon have an OSI compat- 
ible disk. 



Data Resource Corporation 

Suite 204 

1040 Lunaai Street 

Kailua, HI 96734 (808)261-2012 



Manual orders applied to software 
purchases. Programs supplied on 8-in, 
single-density, single-sided disks. 
Hawaii residents add 4% tax. 



GRAPHICS 

FOR OSI COMPUTERS 

ft You Can Produce The Images 
Shown Or Yours And Program 
Motion With Our 256 By 256 High 
Resolution Graphics Kit. ^d 

Thats 65,536 Individually Controlled 
Points On Your TV Screen. 

ft Increase Column/Line Display. 
You Can Set Up Your Own Graphic 
Pixels Including Keyboard Characters 
And Unlimited Figures. ^* 

ft This Kit Includes All Parts, Software 
And Assembly Instructions Required 
To Get Up And Running. 
The Included 8k Of 21 14 Memory 
Is Automatically Available When 
Not Using The Graphics. 
Boot Up And See 8k More Memory. 

ft Adding The Kit Does Not Affect^ 
Your Existing OSI Graphics. 
Use Both At The Same Time 
Or Separately. 

ft Buy The Entire Kit, 

Including Memory, For $185.00 
Or A Partial Kit For Less If You 
Have Parts. Board And 
Instructions $40.00. Instructions 
Include Software. 




t 



For This Kit Or A Catalog 

Of Other Kits, Software 

And Manuals Call Or Write: 

MITTENDORF ENGINEERING 

905 Villa Neuva Dr. 

Litchfield Park, Az. 85340 

(602)-935-9734 




BOX 120 

ALLAMUCHY, N.J. 07820 

201-362-6574 

HUDSON DIGITAL ELECTRONICS INC. 

THE TASK* MASTERS 

HDE supports the *TIM, AIM, SYM and KIM (TASK) with a growing line of computer programs and 
peripheral components. All HDE component boards are state-of-the-art 4 1 / 2 " x 6V2", with on board 
regulation of all required voltages, fully compatible with the KIM-4 bus. 



OMNIDISK 65/8 and 65/5 

Single and dual drive 8" and &W disk systems. 
Complete, ready to plug in, bootstrap and run. 
Include HDE's proprietary operating system, 
FODS (File Oriented Disk System). 



DM816-M8A 

An 8K static RAM board tested for a minimum of 
100 hours and warranted for a full 6 months. 



DM816-UB1 

A prototyping card with on-board 5V regulator 
and address selection. You add the application. 



DM81 6-P8 

A 4/8K EPROM card for 2708 or 271 6 circuits. 
On board regulation of all required voltages. 
Supplied without EPROMS. 



DM816-CC15 

A 15 position motherboard mounted in a 19" 
RETMA standard card cage, with power supply. 
KIM, AIM and SYM versions. 



DISK PROGRAM LIBRARY 

Offers exchange of user contributed routines 
and programs for HDE Disk Systems. Contact 
Progressive Computer Software, Inc. for details. 



HDE DISK BASIC 

A full range disk BASIC for KIM based systems. 
Includes PRINT USING, IF . . . THEN . . . ELSE. 
Sequential and random file access and much 
more. $175.00 

HDE ADVANCED INTERACTIVE 
DISASSEMBLER (AID) 

Two pass disassembler assigns labels and con- 
structs source files for any object program. 
Saves multiple files to disk. TIM, AIM, SYM, KIM 
versions. $95.00 

HDE ASSEMBLER 

Advanced, two pass assembler with standard 
mnemonics. KIM, TIM, SYM and KIM cassette 
versions. $75.00 ($80.00 cassette) 

HDE TEXT OUTPUT PROCESSING SYSTEM 
(TOPS) 

A comprehensive text processor with over 30 
commands to format and output letters, docu- 
ments, manuscripts. KIM, TIM and KIM cassette 
versions. $135.00 ($142.50 cassette) 

HDE DYNAMIC DEBUGGING TOOL (DDT) 

Built in assembler/disassembler with program 
controlled single step and dynamic breakpoint 
entry/deletion. TIM, AIM, SYM, KIM AND KIM 
cassette versions. $65.00 ($68.50 cassette) 

HDE COMPREHENSIVE MEMORY TEST 
(CMT) 

Eight separate diagnostic routines for both 
static and dynamic memory. TIM, AIM, SYM, 
KIM and KIM cassette versions. $65.00 ($68.50 
cassette) 



AVAILABLE DIRECT OR FROM THESE FINE DEALERS: 



Progressive Computer Software 
405 Corbin Road 
York, PA 1 7403 
(717)845-4954 



Johnson computers 

Box 523 

Medina, Ohio 44256 

(216)725-4560 



Lux Associates 
20 Sunland Drive 
Chico, CA 95926 

(916)343-5033 



Falk-Baker Associates 

382 Franklin Avenue 

Nutley, NJ07110 

(201)661-2430 

Laboratory Microcomputer Consultants 

P.O. Box 84 

East Amherst, NY 14051 

(716)689-7344 



Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

(516)744-6462 
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The Single Life 



Editor's note: This column is a 
new, on-going addition to MICRO. The 
purpose is to provide information 
about, product evaluations of, and uses 
for the single board computers and 
their makers. Readers are encouraged 
to submit entries for publication to: 

Brad Rinehart 

1508 Stanton St. 

York, Pennsylvania 17404 



So, you've put away your old single 
board computer and have purchased 
one of the new personal computers. As 
you unpack it from the carton you 
marvel at the simplicity and ease with 
which you can plug it in, turn it on, and 
find something displayed on the screen. 
Not only that, but it comes complete 
with pre-packaged software! Certainly 
more appealing than the pile of bread- 
boards and wire lying in the corner. 
Then suddenly you begin to reminisce 
about the "good old days" when adding 
a new peripheral to your single board 
machine left a feeling of pride and ac- 
complishment. Well, you're not alone. 



Those days are behind us now. In 
today's world, plastic packaging, pre- 
packaged software, and intriguing 
games have taken the spotlight. What 
most of us have failed to realize 
though, is that most of the single board 
promoters are still with us and are pro- 
ducing some pretty sophisticated hard- 
ware and software. Some of these man- 
ufacturers even custom tailor their 
hardware and software for OEM and in- 
dustrial applications. 



Many of these single board-based 
machines have found their way into 
schools, laboratories, institutions, in- 
dustry, and of course in the homes of 
computer hobbyists. OEMs may well 
want to consider the single board com- 
puter for its versatility, adaptability, 
durability, and modular design. Many 
manufacturers produce: 

Backplanes 
Memory boards 
Disk controllers 
EPROM cards 



RS-232, 1EEE-488, and parallel 

interfaces 
A/D and D/A converters 
Cabinets and enclosures 

and a host of other items all designed to 
expand and support one or more of the 
current single board computers. This 
type of modularity allows OEMs and 
industrial manufacturers to include 
necessary design functions in their pro- 
ducts without incurring the expense of 
unwanted or unnecessary hardware. 

For example, Hudson Digital Elec- 
tronics Inc. (HDE Inc.] supports their 
line of TIM-, AIM-, SYM-, and KIM- 
compatible (hence the name TASK 
Masters) hardware with complete de- 
velopment systems. 

In comparison with the personal 
computer manufacturers, the single 
board people rely heavily upon OEMs 
and industrial users to purchase their 
products. Therefore, their products are 
usually built to be durable, reliable, 
sophisticated, and easy to maintain. 
This explains the higher initial cost, as 
compared to the personal computer, 
which is normally built entirely on a 
single board and packaged to please the 
consumer. However, when one con- 
siders the advantages to the industrial 
user of modular design, this higher in- 
itial cost factor can easily be justified. 
For example, some of the single board 
systems can be expanded from a single 
five-inch disk drive to several double- 
sided eight-inch drives simply by 
changing the disk controller card and 
drives. The software remains compati- 
ble. In addition, because most do not 
use memory-mapped video, almost any 
CRT or hardcopy terminal can be inter- 
faced directly to them. This does create 
a problem of providing software which 
will interface to different brands of ter- 
minals, but this problem can be over- 
come, as we shall see later. 



The problem of maintenance is 
greatly simplified in a modular system. 
To isolate a problem, one must only 
remove and replace the individual 
boards until the problem is corrected. 
Then, the board that caused the prob- 
lem is either sent for repair or repaired 
by the user. In many cases a modular 
system will still be operable even if no 
spares are available to replace the 
broken board. For example, if the prob- 
lem were in a memory board, the sys- 
tem might still operate, using the 
memory available on other memory 
boards which had not failed. Hence, 
very little down time! 



If the user does stock spare boards, 
the cost is usually very minimal. Then, 
after the problem has been isolated, the 
broken board may be returned to the 
manufacturer for repair. In addition, 
Perry Peripherals on Long Island does 
repair work on AIM, SYM, and KIM 
boards. (Steve Perry told me that the 
turn-around time is approximately one 
week.) 

Because the single board promoters 
depend on those who use their products 
in custom applications, they are most 
eager to provide excellent customer 
support. HDE, for example, provides 
in-house engineering and custom soft- 
ware development on a contract basis. 
Other manufacturers such as The Com- 
putcrist, Micro Technology Unlimited, 
Systems Innovations Inc., etc., provide 
detailed explanations describing how to 
interface and use their products. Also 
helpful are Perry Peripherals' applica- 
tion notes concerning the AIM, KIM, 
and SYM single board machines. 

The single board people seem to 
have taken a silent oath to standardize 
the bus structure of their products as 
much as possible. Therefore, it may be 
possible to use one manufacturer's pro- 
cessor board with another's card cage 
and memory cards. In yet another step, 
some vendors supply interfaces which 
will adapt one manufacturer's product 
to another's. For example, Perry 
Peripherals can provide a KIMSI to 
HDE's disk system interface. This idea 
of modular design and interfacing one 
manufacturer's product to another 
erases the problem of obsolescence. So, 
when a new board is introduced, just 
plug it in. There is no need to replace 
the entire system in order to upgrade it. 

In addition to the equipment manu- 
facturers themselves, other vendors are 
providing hardware. Optimal Tech- 
nology offers an EPROM programmer, 
complete with software listings, that 
interfaces through a PIA to many of the 
single board systems. Keystone Data 
Consultants Inc. will be releasing a 
time-of-day clock for the KIM 4 bus 
(2nd quarter 1982). In addition, 
Keystone Data can provide equipment 
and software to interface 110V and 
220V devices to numerous single board 
machines. Progressive Computer Soft- 
ware Inc. offers a disk head cleaning kit 
for HDE disk systems. The list goes on 
and on. 

Why have the personal computers 
attained so much popularity while the 
single boards have been "left in the 
dust?" Good question! There appear to 
be several reasons. As mentioned 
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before, initial purchase price has an ef- 
fect upon the "business user." In to- 
day's runaway inflation, the business 
man is out to get the most for his hard- 
earned dollar. Another reason may be 
packaging. The personal computers are 
packaged in an appealing plastic and 
sometimes metal cabinet. Many single 
board systems are packaged in a heavy, 
industrial cabinet, enough to give any 
secretary heart failure. I have also been 
told that because very few "how-to-fix- 
bugs-in-your-system" articles have 
been written about the single boards, 
they have not received the publicity of 
some other systems. Perhaps some of 
the single board manufacturers should 
intentionally build boards that need 
fixing! The most obvious reason for 
this lack of interest though, is the ap- 
parent lack of software for these single 
board-based systems. 

I find this hard to believe. After all, 
weren't the single boards here first? 
Don't those of us who suffered through 
the "hex keypad syndrome" pride 
ourselves in having to really "know the 
system" in order to have written soft- 
ware? Although I will admit it would 
have been very difficult to write 
"General Ledger" on a KIM with a hex 
keypad, times have changed! One of 



the oldest and probably best-known 
supporters of the TIM, AIM, SYM, and 
KIM single boards, HDE Inc., offers a 
great deal of development software to 
complement their tried and proven disk 
operating system — FODS. 

For assembly language program- 
mers, there is a text editor, assembler, 
dynamic debugging tool, and a dis- 
assembler that generates source code, 
complete with labels. The text editor 
may be used, not only to generate 
assembly language source code, but 
also for composition. 

The assembler is a multifile assem- 
bler, meaning that source code is not 
limited to the amount of available 
memory. Several files may be assembled 
by calling them in from the disk. In ad- 
dition, the assembler includes a for- 
matter which prints the listings in the 
proper format, therefore alleviating this 
chore when the source code is entered 
by the programmer. This, of course, 
saves several bytes of memory per line 
of source code [no need to insert spaces 
to align the columns). 

The dynamic debugging tool (DDT) 
is a comprehensive debugger that 
allows the assembly language program- 



CBM/PET? SEE SKYLES ... CBM/PET? 



"They laughed when I sat down 
at my PET and immediately pro- 
grammed in machine language. . . 
just as easily as writing BASIC." 

With the new Mikro, brought to you from England by Skyles 

Eleclric works, always searching the world for new products for PET/CBM owners. A 
4K machine language assembler ROM ihai plugs into your main board. Ai just $80.00 for 
Ihe Mikro chip, ii does all ihe machine language work for you; all you have to do is stari 
laying down the code. 

The Mikro retains all the great screen editing features of the PET. . .even all the Toolkit 
commands. (If you own a Toolkit, of course.) Sit down and write your own machine 
language subroutine. The program you write is the source code you can save. And the 
machine language monitor saves the object code. The perfect machine language answer 
for most PET owners and for most applications. (Not as professional as the Skyles Macro- 
TcA...not as expensive, either.) 

A great learning experience for those new to machine language programming but who 
want to master it easily. Twelve-page manual included but we also recommend the book, 
"6502 Assembler Language Programming," by Lance A. Leventhal at $17.00 direct 
from Skyles. 

Skyles guarantees your satisfaction: if you are not absolutely happy with your new 
Mikro, return it to us within ten days for an immediate, full refund. 

Skyles Mikro Machine language assembler $80.00 

"6502 Assembler Language Programming" by Leventhal 17.00 

Shipping and Handling /USA/Canada/ $2.50 (Europe/Asia) $10.00 

California residents must add 6Vo/6'/i% sales rax, as required. 



Skyles Electric Works 

231E South Whisman Road 
Mountain View, California 94041 
(415) 965-1735 



Visa/Mastercard orders: call tollfree 
(800) 227-9998 (except California). 
California orders: please call (415) 
965-1735. 
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mer to insert break points in a program, 
single-step the program, proceed to a 
breakpoint, step multiple instructions 
at a time, and read and change memory 
locations. In addition, DDT will dis- 
play memory as a single byte, an ad- 
dress word, ASCII characters, or dis- 
assembled instructions. Memory may 
be changed using the current display 
mode. For example, if an ASCII 'A' is 
displayed, to change it to a 'B' it is only 
necessary to type in a 'B'. 

While in the instruction disassem- 
ble mode, the instruction may be 
changed by typing in the mnemonic 
and data for the new instruction. The 
user should be aware that if an instruc- 
tion's byte count is longer than that of 
the instruction being replaced, no at- 
tempt is made to move the existing 
code. Remember, this is a debugger, 
not an assembler. In the single-step 
mode (this is a software function, not 
hardware) DDT displays the contents 
of all registers, the instruction address 
and mnemonic, as well as the condi- 
tion code flags, after each instruction is 
executed. 

The disassembler (AID for Advanced 
Interactive Disassembler) is truly a 
work of art. Most disassemblers merely 
generate hard copy listings that contain 
the instruction mnemonic and refer- 
enced address. If you've ever taken one 
of these listings and tried to decipher it, 
you'll really appreciate AID. Not only 
does it assign labels to all the refer- 
enced addresses and output hard copy, 
it also builds a source file in memory 
that is compatible with the HDE text 
editor |TED). In addition to all this, if 
the disassembled source file grows 
larger than the available memory, AID 
asks you if you want to save the file to 
disk. If so, it automatically saves it, 
resets the textfile pointers, and con- 
tinues disassembling. 

All HDE-supplied development 
software interfaces to FODS, the File 
Oriented Disk System. FODS is a com- 
plete disk operating system, because 
simple commands are provided for all 
disk operations. User commands may 
be added by building an object module 
(executable 6502 code) and saving the 
module to disk identified by a three- 
character name. Then, whenever the 
three characters are entered from the 
keyboard, FODS will access the system 
drive, load the module, and execute it. 
In addition, whenever FODS reads or 
writes the disk, it does a read after read, 
or read after write verify. In other 
words, it compares what was read 
from, or written to, disk with the data 
in memory, thus insuring positive data 
transfer. 
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Disk accesses made through FODS 
are very fast. This is partly due to the 
format used to save files to disk. FODS 
does not use the sector-mapping tech- 
nique when writing to the disk. In- 
stead, disk files are written one sector 
after another, in a straight line, so to 
speak. This can cause some grief to the 
user who is accustomed to sector- 
mapping techniques that write data to 
any available sectors. So, as new files 
are created and old ones deleted, 
"holes" appear in the index. When the 
disk becomes full it is necessary to 
"PAK" it, thus filling in the gaps. From 
a development standpoint, this can be 
somewhat annoying. In actual applica- 
tions programs, however, this is of lit- 
tle consequence as methods have been 
devised to re-use the disk space with- 
out "PAK"ing the disk. 

One good point is that by allowing 
these holes, deleted files can be 
recovered — provided the disk has not 
been packed. Have you ever deleted the 
wrong file and wasted hours of develop- 
ment time? Well, under FODS, you can 
recover these. 

In addition to assembly language 
development tools, there are numerous 
high-level languages available for 
HDE's disk-based systems. Eric 
Rehnke's 6502 FORTH has been of- 
fered in cassette version for some time 
now. I understand that it either is or 
will soon be avilable for HDE disk- 
based systems. 

HDE is offering CPM on their 
systems. Yes, a 6502 version of the 
popular CPM operating system. In ad- 
dition, a UCSD Pascal interface is 
available from HDE or their dis- 
tributors. This package will interface 
Softech Microsystem's popular lan- 
guages, Pascal, FORTRAN, and BASIC, 
to HDE's disk system. An advantage to 
using the Pascal system is that your 
programs become portable. This means 
that a package written on another 
machine operating under the UCSD 
system will normally run under the 
HDE disk system, and vice versa. This 
really opens up some doors for software 
compatibility! 



Probably the most significant addi- 
tion to HDE's growing line of develop- 
ment software is HDE Disk BASIC. 
Built around the popular Microsoft 
BASIC, this package is really an eye 
opener. I have been evaluating HDE 
Disk BASIC for approximately a year 
now, and believe me, an enormous 
amount of work and forethought has 
gone into this package. 



In order to allow for the multitude 
of terminal configurations that are on 
the market today, a personality module 
has been implemented which allows 
the user to custom tailor the software 
to the terminal. Also, a 250-character 
input buffer allows numerous state- 
ments per line. HDE BASIC allows the 
user to save data three ways. There is 
the simple "snapshot" data file, as 
well as sequential data files, and ran- 
dom access files. All of the old KIM 
BASIC commands have been carried 
along in this new version, making it an 
easy task to upgrade your old software. 
In addtion, a multitude of new com- 
mands have been added, making this 
one of the most powerful BASIC inter- 
preters I have had the pleasure of 
evaluating. 

OK, you say, this is all well and 
good, but I don't want to develop all 
my own software. Besides, I'm an in- 
dustrial user and I need a multitasking 
process control system. Well, look no 
further! Keystone Data Consultants 
Inc. has such a system available. The 
software, called PECO, for Process En- 
vironment Operating System, provides 
the industrial user with a real time 
multitasking operating system. Key- 
stone Data will configure the software 
to run stand-alone or in conjunction 
with an HDE disk-based system. 

PECO allows job scheduling, queue 
processing, event timing, single or 
multiple access points, interrupt- 
driven operations, time-of-day sched- 
uling and a host of other features. 
PECO is not a "pre-packaged" piece of 
software; Keystone Data provides the 
software based upon user specifica- 
tions. The system can be provided in 
EPROM, or on disk. In addition, the 
software may be licensed in either ob- 
ject or source code. 

There are numerous vendors willing 
to provide custom software for the in- 
dustrial and OEM user. In many in- 
stances, equipment manufacturers them- 
selves provide this service. Outside 
sources, like Keystone Data Con- 
sultants offer this service either to the 
manufacturer or their customers. Most 
single board manufacturers can provide 
the user with names of reliable soft- 
ware vendors. 



What about applications software? 
Even though HDE Disk BASIC has only 
been released a short time, there are 
already several vendors supplying ap- 
plications software and numerous 
user's groups providing games and 
numerous utility programs. The HDE 



Disk Program Library is presently 
undergoing some structural changes, 
but should be in operation by the time 
this is printed. 

For the more serious user, I know of 
at least two vendors offering business 
applications programs for HDE disk- 
based systems. Western New York Micro 
offers Mail Manager, Mini Money 
Manager, Payroll Office, Memo Writer, 
and Tax Advisor. Keystone Data Con- 
sultants offers Data Foreman, Check- 
ing Account Management, Inventory 
Management, and will be releasing 
Accounts Payable/Receivable, and 
General Ledger. Contact both of these 
vendors for additional information. 

The allure of plastic and chrome is 
very tempting. But, now that you 
know, give the single boards 'Another 
Look.' You may be surprised at what 
you find. 

Manufacturers are encouraged to 
keep Mr. Rinehart aware of new pro- 
ducts for the single board computers. 



Names and Addresses of Vendors 

Eric Rehnke 

1067 (adestone Lane 

Corona CA 91720 

Hudson Digital Electronics Inc. 
P.O. Box O 

Allamuchy, NJ 07820 

Keystone Data Consultants Inc. 
P.O. Box 606 
York, PA 17405 

Micro Technology Unlimited 
2806 Hillsborough St. 
P.O. Box 12106 
Raleigh, NC 27605 

Optimal Technology 
Blue Wood 127 
Earleysville, VA 22936 

Perry Peripherals 

P.O. Box 924 

Miller Place, NY 11764 

Systems Innovations Inc. 
P.O. Box 2066 
Lowell, MA 01851 

The Computerist 
34 Chelmsford St. 
P.O. Box 6502 
Chelmsford, MA 01824 

Western New York Micro 

P.O. Box 84 

East Amherst, NY 14051 

JMCftO 
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SMART II MEANS FAST. 
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SMART II MICROPROCESSOR CONTROLLED PARALLEL PRINTER INTERFACE 

Be Smart! With the new SMART II parallel printer interface for your Apple II* Computer you 
can have print spooling, left and right margin control, and adjustable tab stops. The SMART II 
can buffer over three thousand characters before it signals the Apple to stop sending. This 
eliminates the start - stop problem created with conventional printer cards and will keep your 
printer printing (instead of waiting). 

The SMART II is compatible with all known hardware and software including the Pascal 

Language System, Microsoft Z-80 Softcard*. 

and Hayes Micromodem II*. available at your local apple dealer 



FEATURES: 

Compatible with all Centronics-type Parallel printers 
including the Epson MX-70/80/100, Centronics 737/739/779, 
IDS 440/445/460/560, C. Itoh Starwriter, Anadex 
8000/9000/9500. and similar printers. 

3K Print Spooler which acts much larger when spooling 
text because of a unique compaction routine 

On board software supports typewriter-like TAB Com- 
mands and has 16 software selectable TAR positions. Left 
and right margin commands are also software selectable to 
ease in the justification of reports and listings. 

Use with the Hayes Micromodem II* to prevent loss of 
characters while on line with a host computer. 



Apple is a registered trademark ol Appie Computer. Inc. 
2-80 Softcard is a registered trademark of Microsoft. 
Micromodem II is a registered trademark of Hayes. Inc. 



INTRODUCTORY 
RETAIL PRICE 



$225. 



(cable and 
connector 
included) 



HARDWARE: 6800 type microprocessor 
Two ROMs 
Six static RAMs 
Eight support ICs 
4 ft printer cable and connector 
High quality board with gold plated 
edge connector 



OLENSKY BROS., INC. 

COMPUTER SALES DIVISION 

3763 AIRPORT BLVD. 

MOBILE, AL 36608 

TOLL FREE: 800-633-1636 

DEALER INQUIRIES INVITED. 
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Now You Have "The ChoicE" 

Reliability, Quality and Performance at a reasonable Price. Systems International, Inc. is pleased 
to offer an alternate to Ohio Scientific microcomputers. Our systems are 100% compatible to OSI 
OS-65D and OS-65U software to preserve your software development investment. Just load your 
present floppies and run; no conversion of software needed or required. Compare the Following 
Facts and Make "The Choice." 



Ohio Scientific, Incorporated 

Standard Features 

C2-OEM 

48K Memory, 1 MHz 

One Serial Port 

Dual 8" Single Sided Floppies 

Plug in Boards with Many Connections 

120 Volt 60, Hz Operation Only 

90-Day Warranty 

Weight 80 Pounds 

SizeW17" x H9V2" x D23V2" 



Extra Cost Items 

Second Serial Port 

Parallel Port 

2 MHz 



Systems International, Incorporated 

Standard Features 

The Choice II 

48K Memory, 2 MHz 

2 Serial Ports. 1 Parallel Port 

Dual 8" Double Sided Floppies 

Single Board Construction for Reliability 

120/240 Volt 50/60 Hz Operation 

180-Day Warranty 

Weight 40 Pounds 

Size W12V2" x H13 1 /2" x D16" 

Shippable by UPS in Factory Carton 

Extra Cost Items 



None 



Now Compare tIie Bottom Line an<I MaIie "TIie ChoicE" 



Total Retail $4,925.00 * 



Total Retail $4,525.00 
240 Volt 50 Hz Operation add $50.00 



Future plans include the "Choice ///"which is 100% compatible to the OSI C2-D 8" Winchester 
System. Also Multi-user Winchester Hard Disk System that is 100% compatible with Ohio Scien- 
tific OS-65U Level 3 Software. 

REMEMbER — ThERE IS "THE Choice" TO choOSE A bETTER SySTEIVl! 

Domestic and International Dealer and Distributor Inquiries are Invited. Discounts to 40% 
* Ohio Scientific Price List June/July 1981 

dtyblemb tfwlefrMafamal f <!h%cc/if whaled 



15920 Luanne Drive 

Gaithersburg, Maryland 20760 

U.S.A. 

Tel. (301) 977-0100 Twx# 710-828-9703 



Sii 



500 Chesham House 

1 50 Regent Street 

London W1R 5.F.A England 

Tel. 01-439-6288 Tlx 261426 
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PET/CBM 

2000/30D0/4000 Series 
not using a CRT, on display controller chip 

$275.00* 



Select either 
SO x 25 on 40 x 35 



On The 
Built-in 
Display 



From the keyboard or program 

Displays the full, original character set 

Available from your local dealer or: 
EXECDM CORP. 

1901 Polaris Ave. 
Racine, Wl 534Q4 
Ph. 41 4-632-1 00-4 

*Plus installation charge of $"75.00 



Available only for Basic 3.0 & Basic 4.0 
PETS CBM™a 
trademark of Commodore Business Machines 



kim -::- sym -::- aim users 
sales support 

hde disk systems 

new' adc-818- 1 6 analog-to-digital converter 
with 16 channel analog inputs 11 

---kim-4 bus compatible 

kb- bit conversion 

-::-bo usec conversion 

-"-BUILT 0N4-1/gx6CAR0 
v-MUX-OUT AVAIL FOR ANALOG SIGCONOITIONING 
SBUY BUILT AND TESTED OR SAVE $$ AND BUY 
KIT 
-"-COMPLETE W/MANUAL AND CIRCUITS 

A0C-8ia-1 S (BUILT & TESTEO) $295 00 

ADC-818-1 6KW [KIT W/WIRE WRAP 

SOCKETS) $15900 

ADC-818-1 6KSIKIT W/SOLDER 
SOCKETSI $15900 

SOFTWARE FOR ALL FODS 
BASED SYSTEMS: 

MAIL MANAGER PRICE $49 95 

SOFTWARE FOR HDE BASIC: 

MINI-MONEY MANAGER PRICE $99 95 

MEMO WRITER PRICE $4995 

PAYROLL OFFICE PRICE $99 95 

TAX ADVISOR ... PRICE $79 95 

CLASS RECORD PRICE $49.95 

STATISTICAL PACKAGE PRICE $S4 95 

PLEASE WRITE FDR COMPLETE DESCRIPTION 

M RE SP EC I ALS : " 

^•CENTRONICS 739-1 PRINTER REG $995/ 
NOW $699 

^CENTRONICS 704 PRINTER REG SS495/ 
NOW $1795 

-::-2716's- 10 95@/3 FOR 9 95@/ 10 FOR 8 80S 
DEALER INQUIRIES INVITED 

ADD $3 00 FOR SHIPPING ON ORDERS UNDER 
$100 FREE SHIPPING DN ORDERS OVER $100 
NEW YORK RESIDENTS ADD 7% SALES TAX 

WSSTCRN N€UJ VOflK MICROCOMPUTER i« 



S CP i 



P BOX 84 

EAST AMHERST NY 14051 
716/689-7344 



AIM-65/SYM-PET-KIM-6800 

Universal Interface Board Converts AIM-65/SYM 
Into Professional Data Logger 



MINI MOTHER 
BOARD 



ADDRESS 

SELECTION 

(CLOCK. MUX 

A/D) 




16 CHANNEL 
MUX 



BANK SELECT. 
ADDRESS 
(MEMORY! 



16 A/D INPUTS 



950 N. HAGUE AVE., COLUMBUS, OHIO 43204 U.S.A. 
PHONE: (614) 488-6176 TELEX: 246514 



(Also connects to PET or KIM with adapter cable. 
Adaptable to other 6502 and 6800 systems) 

CONTAINS: 

* 12 bits, 16 channels, fast A/D converter 

* space for additional 16K RAM memory or 32K 
EPROM (or combination) 

* real time clock/calendar with real time interrupt 
capability and 10-year lithium battery backup 

* plugs directly into AIM-65 expansion connector 
with the help of a mini-mother board which 
supports up to three interface boards 

* supplied with supportive demonstration and 
control programs 

AVAILABLE MODELS: 

* IB-902 Additional Memory 

Space (only) $ 390.00 

* IB-902-A Calendar/Clock plus 

memory space $ 690.00 

* IB-902-B A/D (12 bits, 16 channels 

plus memory space) $ 960.00 

* IB-902-AB A/D, plus memory space 

and calendar/clock $1 ,270.00 

Mini mother board to support up to three (3) 

i nterface boards $65.00 

Quantity Discounts Available 
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Some Help for KIM 



Part 3 



The author presents hardware 
and software for an improved 
single-step function. Also 
included is a TRACE routine. 



Wayne D. Smith 

Box 8352 

Austin Peay State University 

Clarksville, Tennessee 37040 



Last month we examined the operation 
of the KIM single-step hardware. We 
saw that a simple modification to this 
hardware would allow the substitution 
of user-supplied software for the KIM 
software. 

There is a number of variations on 
this basic scheme. Several K areas may 
be ANDed together to allow moving 
the single-step program to different 
areas as the need arises. Switches may 
be added to allow the selection of 
various K areas, as desired. If you ex- 
tend this concept to the most general 
case, the circuit in figure 1 can be used. 
With these eight switches installed, the 
single-step software may be moved to 
anywhere in the lower 6K of memory. 

By turning on the appropriate K 
switch, any K area can be prevented 
from generating the single-step NMI. 
Be sure that the K7 switch is also on, 
however, or the KIM software will 
single-step. If only the K7 switch is on 
and the NMI vector is set to $1C00, the 
system will perform as an unmodified 
KIM. If a K switch is on, it means that 
programs in this area will run at normal 
speed, even if the single-step switch is 
on. Since the K6 and K7 areas contain 
KIM ROM, these switches would both 
normally be on. They may be turned 
off, however, if you want to single-step 
any of the KIM software. 



CUT TRACE 



Vcc 



R7 



IT 



6 

-a 

7 



6502 



NMI 
SYNC 




DIP 

SWITCH 
PKG 



7430V- ^>> 



1/6 7404 




Figure 1: The extension of the technique to include switch selectable K areas that 
will allow the use of a single-step program stored in any of several K areas. 



The 8.2 K Q pull-up resistors shown 
in figure 1 are required to prevent 
noise, which might inadvertently gen- 
erate a NMI if the 7430 inputs were left 
floating. These pull-ups supplement 
rather than replace the 560 Q pull-ups 
already on the K signal outputs from 
the 74145. The additional pull-ups 
must be used, even though they do 
reduce the fanout of the K signals 
slightly. With this modification, try to 
limit the load on the K signal to about 
five normal TIL loads. 



A secondary problem with the KIM 
software is eliminated with the hard- 
ware modification described above. 
This problem has to do with the KIM 
Peripheral Interface Adapters (PIAs). In- 
cluded within the KIM single-step soft- 
ware are provisions for resetting the 
directional registers associated with 
the KIM PIA. It is, therefore, impossi- 
ble to single-step a program which 
depends upon the setting of this direc- 
tional register. As the single-step inter- 
rupt is generated, the KIM software 
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resets the registers to the KIM con- 
figuration. This, of course, negates any 
setting of the directional registers that 
may have been accomplished by the 
user. This can result in a program 
which runs correctly in the normal 
mode, but which will not run in the 
single-step mode. 

Installing the switch-selected single- 
step area is probably best accomplished 
on a small perf board. I installed mine 
on the board that contains my data bus 
buffers. If you are willing to settle for 
the single additional area, the hardware 
modification can be made directly on 
the KIM board. A single trace must be 
cut as shown in figure 2. The AND gate 
(7408) may be mounted on the KIM 
board in any convenient location using 
a little contact cement. Mount the IC 
with the legs up. By being careful, you 
can make all the solder connections 
directly to the socket contacts on the 
KIM board. Just be sure that the solder 
doesn't interfere with the insertion of 
the KIM into the sockets. For conve- 
nience, the 7408 connections are listed 
in table 1. 

The improved single-step program 
is shown in listing 1. The program is 
completely relocatable, and may be 
moved anywhere in memory without 
address changes. Other than the normal 
KIM page zero locations, SSTEP uses 
one additional page zero location, SEE. 




Figure 2: Modification to the KIM-1 board for additional single-step programming 
areas. Only one trace must be broken as indicated in the drawing. The area shown 
is the lower right side of the board, near the keyboard. You may want to delay the 
modification until the 90-day warranty has expired. 



Perry PeripIieraLs Repairs KIMs!! 

(SYMs ancJ AIMs Too) 



• We will Diagnose, Repair, and Completely Test your Single Board Computer 

• We Socket all replaced Integrated Circuits 

• You receive a 30-day Parts and Labor Warranty 

• Labor is $38.00 if 40-pin ICs are socketed ($40.00 otherwise) — Parts Extra 

• Your repaired S.B.C. returned via U.P.S. — C.O.D., Cash 

Don't delay! Send us your S.B.C. for repair today 
Ship To: (Preferably via U.P.S.) 

Perry PerIp^eraIs 

6 Brookhaven Drive 
Rocky Point, NY 11778 

Perry Peripherals carries a full line of the acclaimed HDE expansion components for your KIM, SYM, and 
AIM, including RAM boards, Disk Systems and Software like HDE Disk BASIC VI. 1. Yes, we also have 
diskettes. For more information, write to: P.O. Box 924, Miller Place, NY 11 764 or Phone (516) 744-6462. 



Table 1: The 7408 pin connections for a single additional single-step program 
storage area. K5 is used as the additional area, but may be changed if desired. 
Pins not listed are not connected. 



Pin Number 

1 
2 
3 
7 
17 



Connection 

K5 

K7 

U26 pin 4 

Ground 

Vcc 



Attach To 

KIM App I 
KIM App H 
at cut trace 
KIM Exp 21 
KIM Exp 22 



A Trace Program 

While the single-step routine is a 
great help in debugging programs, there 
are times when it is inconvenient to sit 
at the terminal, pressing the G key 
after every step. It is often desirable to 
let the program run from beginning to 
end without intervention, but still 
have the steps traced, and the register 
information printed as the program ex- 
ecutes. The resulting printout can then 
be analyzed at a more convenient time 
or place. 



If you use the program in the K5 
RAM, resist the temptation to make 
any changes that lengthen the program. 
SSTEP ends at $17E6, and the KIM tape 
routines use variables at $17E7 and up. 
(Believe me, this wasn't easy, and ac- 
counts for some of the strange coding.] 
If you lengthen the program, the tape- 
write routine (including Super-tape) 
will destroy some bytes above S17E7, 
and render loading the program from 
tape impossible. 



To use the program, first make the 
hardware modification as shown in 
figures 1 and 2. Then load the program 
normally. Be sure to set the NMI vector 
(S17FA, $17FB) to the starting location 
of the new single-step program ($1780). 
Now whenever the single-step switch 
is on, the complete status of the 
machine is printed as each instruction 
is executed. The status printed is the 
status after the instruction on that line 
has been executed. The registers are 
listed in the order X, Y, A, S (stack- 
pointer) and P (status). 

The program shares one idiosyn- 
crasy with the KIM single-step pro- 
gram. If a subroutine jump is executed 
to a routine within the non-interrupt 
area (say K7), the program will perform 
this routine at normal speed, without 
any output. The program will, how- 
ever, also execute the first step follow- 
ing the return at normal speed. Recall 
that the interrupt is generated as the in- 
struction is fetched, but not honored 
until the instruction has been com- 
pleted. That means that the first in- 
struction after the return generates an 
interrupt, but will not be listed. The 
status of the registers listed after the 
first step in the subroutine will actually 
be the status after the first step follow- 
ing the return is executed. The operand 
field should be ignored in this case. If 
this presents a problem, simply use a 
NOP immediately after any subroutine 
call to a non-interrupt area. 



Listing 1: Single 


Step Program 








00I0 
















0020 








; PROGRAM 


TO PROVIDE IMPROVED SINGLE STEP 


0030 








J OPERAflON OF THE 


KIM-1 MICROCOMPUTER. 


0040 








; THE 


PROGRAM PROVIDES ALL THE NORMAL 


0050 








; KIM 


■1 SINGLE STF.F 


OPERATIONS PLUS 


0060 








; PRINTING 


THE OPERAND FOR EACH INSTRUCTION 


0070 








J AND 


PRINTING THE 


REGISTER CONTENTS 


0080 








; OF 


>LL REGISTERS 


AFTER THE INSTRUCTION 


0090 








; is 


EXECUTED. A HARDWARE MODIFICATION OF 


0100 








; THE 


KIM 


BOARD IS 


REQUIRED IN ORDER TO USE 


0110 








; THIS PROGRAM. 




0120 








! 








0130 








ACC 


:»$F3 STORAGE FOR ACCUMULATOR 


0140 








PR EG 


= #1F1 STORAGE FOR STATUS REGISTER 


0150 








PCL 


:#$EF STORAGE FOR PGM CNTR (L03) 


01 SO 








PCH 


= #1F0 STORAGE FOR PGM CNTR (HOB) 


0170 








YRE6 


z0 IF 


4 STORAGE FOR Y REGISTER 


0180 








XREG 


= *IF5 STORAGE FOR X REGISTER 


0190 








SPUSER 


:#1F2 STORAGE FOR STACK POINTER 


0200 








poi nth 


r#tFH ASM 


OF CURRENT I N3T (HOB) 


0210 








pon.n. 


-.#tFA ADDR 


OF CURRENT INST (LOB) 


0220 








TEMP 


S*1EE BYTES TO PRINT (.NOW KIM) 


0230 








0UTSP 


rfilEaS KIM ROUTINE TC PRINT Sf'ACE 


0240 








PRTBYT 


:<>il 


lili KIM : 


OUTINE TO PRINT A BYTE 


02 50 








SHOW 


s#$|DAC REENTRY POINT FOR KIM LOOP 


0255 








■ 








02 60 


1780 








*=#1|7 


0270 


1780 


D3 




SSTEP 


CLD 




CLEAR DECIMAL MODE 


0230 


1781 


85 


rs 




STA 


ACC 


SAVE ACCUMULATOR 


0290 


1783 


68 






PLA 




RECOVER STATUS AND 


0300 


1784 


85 


ri 




STA 


PR EG 


SAVE IT. 


0310 


1786 


68 






PLA 




RECOVER PROGRAM COUNTER, 


0320 


1787 


85 


EF 




STA 


PCL 


AND SAVE IT. 


0330 


1789 


S3 






PLA 




SAVE BOTH LOB AND 


0340 


178A 


85 


F0 




STA 


PCH 


HOB. 


0350 


178C 


84 


F4 




STY 


YRES 


SAVE Y REGISTER 


0360 


178E 


86 


F5 




STX 


XREG 


SAVE X REGISTER 


0370 


1790 


BA 






TSX 




TRANSFER STACK POINTER 


0380 


1791 


86 


F2 




STX 


SPUSER 


TO X AND SAVE IT. 


0390 


1793 


20 


9E IE 




JSR 


OUTSP 


PRINT A BLANK SPACE 


0400 


1796 


A2 


04 




LDX 


004 


SET FOR 4 SPACES TO PRINT 


0410 


1798 


38 






SEC 




FIND DIFFERENCE BETWEEN 


0420 


1799 


AS 


ro 




LDA 


PCH 


OLD AND NEW PROGRAM 


0430 


179B 


E5 


FB 




SBC 


POINTH 


COUNTER TO DETERMIN" 


0440 


1790 


A5 


EF 




LDA 


PCL 


NUMBER OF BYTES 


0450 


179F 


E5 


fa 




SBC 


P0I1HL 


TO PRINT. 


04 60 


17AI 


85 


EE 




STA 


TEMP 


SAVE THIS DIFFERENCE 


0470 


I7AS 


Al 


F6 




LUA 


(rOINTL- 


-1,X) LOAD OP CODE 


0480 


17A5 


48 






PHA 




AND SAVE IT. 


0490 


17A6 


29 


OF 




AND 


#10F 


TEST FOR BRANCH AND OTHER 


0500 


17A8 


00 


00 




BNE 


SETY 


UNUSUAL DIFFERENCE INSTS. 


0510 


17AA 


63 






PLA 




RECOVER OP CODE 


0520 


17 AH 


C9 


£0 




CMP 


#120 


IF OP ; 20 THEN 


0530 


17AD 


ro 


08 




BEQ 


SETY 


THREE BYTE INST. 


0540 


17AF 


89 


90 




AND 


#190 


MASK ALL BUT B7, B4 


0550 


17D1 


fo 


15 




BEQ 


SPACES 


IF BOT'I OFF, 1 BYTE INST 


0560 


I7B3 


A9 


02 




LUA 


#02 


ELSE SET FOR 2 BYTE INST 


0570 


17B5 


85 


EE 




STA 


TEW 


BY SETTING TEMP=2 


0580 


1707 


A0 


01 


sety 


LOY 


#01 


SET OFFSET TO OPERAND BYTE 


0590 


171)9 


C-1 


EE 


AGN 


CPY 


TEMP 


COMPARE BYTES PRINTED TO 


0600 


17DB 


fo 


0D 




BEQ 


SPACES 


BYTES TO PRINT. IF NOT 


0610 


17BD 


Bl 


FA 




LDA 


(POIHTL) 


,Y D0»!E, LOAD OPERAND 


0520 


I7BF 


?.o 


3H IE 




JSR 


FI1T3YT 


THEN PRINT IT. 


0630 


17C2. 


A0 


02 




LDY 


#CZ 


SET Y FOR SECOND BYTE 


0640 


17C4 


CA 






DEX 




DECREMENT SPACES TO 


0650 


17C5 


CA 






DEX 




PRINT BY 2. 


0660 


I7C6 


DO 


Fl 




BNE 


AGH 


IF NOT 0, THEN REPEAT 


0670 


17CS 


E8 




SPACES 


I NX 




ONE MORE SPACE TO PRINT 


0680 


17C9 


20 


9E IE 


M0RESF 


JSR 


OUTSP 


PRINT SPACES TO FILL 
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0690 
0700 
0710 
0720 
0730 
0740 
0750 
0760 
0770 
0780 
0790 
0800 
0810 
0820 



17CC 
17CD 
I7CF 
I7DI 
1703 
1706 
17D9 
170A 
17DC 
17DE 
I7E0 
17E2 
I7E4 
I7E7 



CA 

DO FA 
A2 05 
B5 FO 
20 38 IE 
20 9E IE 
CA 

DO F5 
A5 EF 
85 FA 
A5 FO 
85 FB 
AC AC ID 



AGAIN 



DEX 

BNE MORES P 

LDX #05 

LDA PRE3-I ,X 
JSR PRTBYI 
JSR OUTSP 
DEX 

BNE AGAIN 
LDA PCL 
STA POINTL 
LDA PCM 
STA POINIH 
J 11? SHOW 
• END 



OPERAND FIELD. 

SET X TO PRINT 5 REGISTERS 
LOAD AND PRINT REGISTER 

STORAGE IN THE ORDER: 
X, Y, A, STACK POINTER, 
AND STATUS WITH SPACES. 

UPDATE POINTH AND POINTL 
FOR NEXT INSTRUCTION. 



AND RETURN TO KIM 



Listing 2: Trace Addtion to Single-Step Program 



0010 
0020 
0030 
0040 
0050 
0060 
0070 
0080 
0090 
0100 
0110 
0120 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0240 
0250 
02 SO 
0270 
0280 
0290 
0300 



17E4 
17E4 
17E7 
I7EA 
17ED 
17EF 
I7F1 
I7F4 
I7F7 
I 7 FA 
17FD 



20 2F 
20 IE 
20 9E 
AO 00 
El FA 
20 3B 
20 9E 
20 9E 
4C CS 



IE 
IE 
IE 



IK 
IE 
IE 
10 



j A NEW END TO CONVERT THE IMPROVED KIM-1 

; SINGLE STEP PROGRAM TO A TRACE PROGRAM. 

; THE PROGRAM OPERATES SIMILAR TO THE 

; SINGLE STEP PROGRAM EXCEPT THAT THE 

J PROGRAM - BEING EXECUTED RUNS WITHOUT 

; OPERATOR INTERVENTION. A JUMP TO THE 

J KIM MONITOR WILL TERMINATE THE TRACE. 

; NOTE THAT THE ADDRESSES ARE RELATIVE TO 

; THE SINGLE STEP PROGRAM. THE PROGRAM 

; CAN NOT BE LOADED AT THE LOCATION SHOWN. 

; SEE TEXT FOR DETAILS. 

POINTL :#$FA ADDRESS OF NEXT PROGRAM STEP 

GOEXEC :#$IDC8 KIM EXECUTE ROUTINE ADDRESS 

PRTPNT :#$|EIE XIM PRINT ROUTINE 

CRLF = #S1E2F KIM CARRAGE RETURN ROUTINE 

OUTSP :#$1E9E KIM ROUTINE TO PRINT A SPACE 

*:#$17E4 

START JSR CRLF START A NEW LINE. 

JSR PRTPNT PRINT ADDR OF NEXT INST. 

JSR OUTSP PRINT BLANK SPACE. 

LDY #00 SET INDEX FOR OP CODE 

LDA (POINTL), Y WAD 0? CODE AND 

JSR PRTBYT PRINT IT. 

JSR OUTSP PRINT TWO BLANKS. 

JSR OUTSP 

JMP GOEXEC EXECUTE NEXT INSTRUCTION. 

.END 



The program shown in listing 1 can 
be easily modified to perform this 
TRACE function, provided that it is 
stored in some location other than K5. 
As mentioned above, attempting to 
lengthen the program in K5 will result 
in erroneous operation of the tape 
routines, the single-step program, or 
both. 

Since the initial portion of the 
TRACE program is identical to the 
SSTEP, only the step at $17E4 must be 
changed, and eight new steps added 
(listing 2). If desired, a flag can be set, 
and a test and branch sequence inserted 
at the location of the JMP SHOW in- 
struction. In this manner, one program 
can accomplish both functions. I 
elected not to do this, since I keep 
SSTEP in K5 at all times, and only load 
TRACE when it is needed. 

To insure that the program being 
traced terminates properly, simply in- 
clude a JMP KIM (4C 64 1C) as the last 
step in the program. Needless to say, 
the trace program is of limited useful- 
ness unless a hard copy terminal is be- 
ing used. If you are using a CRT, you 
will just have to punch G and watch 
Star Trek at the same time (multi- 
processing?). 

JMCftO 



POWER TO YOUR AIM 

Treat your AIM to a quality power supply: 

1. Designed to Rockwell's specifications for the 
AIM-65 (5 volts at 2 amps, regulated; 24 volts, .5 
amps avg., 2.5 amps peak, unregulated). 

2. Overvoltage protection to protect the expen- 
sive circuits in your AIM (5 volt output). 

3. Handsome all metal case (two tone blue). 

4. Fuse (externally accessible), switch, pilot 
light, line cord, cable from power supply to AIM — 
all included. 

5. Conservative thermal design for long life. 

$64.95 plus shipping (5 lbs.) 

CA residents add 6 % sales tax. 
VISA/MC, cashier's or registered check. 
Personal check (allow 2 weeks to clear). 

CompuTech 

Box 20054 
Riverside, CA 92516 



Engineering Micro-Software Center 

Design Software for Micro-Computers 

Apple II & III 



Vibration Analysis 
Structural Loads and Stress 
General Mechanical Design 



104 E. Queenwood, Suite 2 
Morton, Illinois 61550 
309-263/2602 



Software for Engineers by Engineers 

I. Truss & Linkage Analysis 2D & 3D $75 

II. Beam Analysis w/Multi-Loads (diagrams) $75 

III. Rubber Element Design Shear & Compression $75 

IV. Torsional System Vibration $100 
Holzer Analysis (Branching & Gearing) 

V. Linear Vibration Systems-6 Degree of Freedom Mass $75 

Excellent for Mounting System Response 

VI. Bolted Joint Analysis $50 

VII. Fourier Analysis w/Data Display $35 

VIII. Column Design/Minimum Moment of Inertia Calc $60 

IX. Four-Bar Linkage — Generates Coupler Point Path $60 

Motion Synthesis for Mechanisms 
X. Weibull Failure Analysis — Considers both $60 

Failures and Suspensions w/Printer Plot 
XI. CPM-Critical Path Method of Project Management $60 
Very General — 500 Activities Max 

All Software is Well Prompted 

Many Others Under Development Now 

by our Professional Staff 
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GET FREE SOFTWARE FOR YOUR APPLE !| 



HOW? JUST ORDER ONY OF THE ITEMS BELOW, AND SELECT YOUR FREE SOFTWARE FROM THE BONUS 
SOFTWARE SECTION, USING THE FOLLOWING RULE: FOR THE FIRST $100.00 WORTH OF MERCHANDISE 
ORDERED TAKE 1 ITEM; FOR THE NEXT $200.00 WORTH OF MERCHANDISE ORDERED TAKE ANOTHER 
ITEM; FOR THE NEXT $300.00 TAKE A THIRD ITEM, ETC. ALL AT NO COST. 



HARDWARE BY APPLE 

APPLE II PLUS. 48k 1199 

DISK DRIVE-fCONTROLLER (a3) 535 

DISK DRIVE only 455 

Language System w Pascal 397 

Silenlype Printer & Interlace 360 

Integer or Applesoft Firmware Card 159 

Graphics Tablet 645 

Parallel Printer Interface Card 149 

Hi-Speed Serial Card 1 55 

Centronics Parallel Intfce. 175 

HARDWARE BY OTHERS 

HAYES MICROMODEM II 

HAYES SMART MODEM 

HAYES S100 MODEM 

VIDEX VIDEOTERM 80 W. GRAPHICS 

MICROSOFT Z80 SOFTCARD 

MICROSOFT 16K RAMCARD 

CORVUS 10MB HARD DISK 

SSM AIO SERIAL/PARALLEL AST 

MICRO-SCI Dh* & Controller 

TYMAC DOUBLE DOSa2/13 

VIDEO MONITORS 

Leedex-Video-100 \T B&7W w/Cable 

Leedex 12" Green w/Clble 

Leedex 13" COLOR MONITOR & Cable 399 

SUP-R-TERMRF MODULATOR 29 

HARDWARE BY 
MOUNTAIN COMPUTER 

Clock/Calendar Card 
A/D & D/A Interface 
Expansion Chassis 
ROMplus Card 
Mark Sense Card Reader 
CPS Multifunction Bd. 



SOFTWARE FOR APPLE 



APPLE FORTRAN 

APPLE PILOT 

DOS 33 

DOS TOOL KIT 

APPLE PLOT 

D.J. REPORTER 

D. J. NEWS 

PORTFOLIO 

SHELL GAMES 

ELEMENTARY DEAR APPLE 



159 
125 
50 
65 
58 
45 
45 
45 
25 
25 



WORD PROCESSING 
SOFTWARE FOR APPLE 



300 

239 
339 
275 
29S 
159 
4760 
189 
495 
35 



139 
166 



SOFTWARE BY OTHERS 

APPLE FORTRAN by MICROSOFT 169 
APPLE BASIC COMPILER by MICROSOFT 315 

APPLE COBOL by MICROSOFT 699 

VISICALC33 1tS 

VISIPLOT 156 

VISIPLOT/VISITREND 199 

VISIDEX 189 

CCA DATA MGT. 79 

DB MASTER by STONEWARE 189 

DATACAPTURE 4.0 56 

2 -TERM 65 

ON-LINE APPLESOFT COMPILER 89 



SOFTWARE BY PEACHTREE 



239 


GEN. LEDGER 


319 


A/R 


bbb 


A/P 


13b 


PAYROLL 


UWb 


INVENTORY 


239 


MAIL LIST 



218 
219 
219 
219 

219 
219 



PEN-ULTIMATE 


735 


WORD STAR 


245 


EZ WRITER Prof. Sys. 


195 


EZ WRITER 


89 


MUSE SUPER TEXT II 


139 


APPLE-WRITER 


69 


PROGRAMMA APPLE PIE 2.0 


111) 


MAGIC WAND 


345 


WORDPOWER 


50 


EPSON PRINTERS 




MX - 70 w/Graftrax 


415 


MX -80 


515 


MX -80 FT 


61b 


MX- 80 w. GRAFTRAX 


b/b 


MX -80 FT w. GRAFTRAX 


675 


MX- 100 FT w. GRAFTRAX 


775 


APPLE PAR. INTFCE (for all Epson) 


lb 


MX -70/80 FRICTION FEED Adaptor 


75 


OTHER PRINTERS 




IDS 446 w. GRAPHICS + 2K Buff. 


750 


IDS 460 w. GRAPHICS 


R9R 


IDS 460 


826 


IDS 560 


IDS* 


IDS 560 w.GRAPHICS 


1150 


CENTRONICS 737 


899 


CENTRONICS 739 


790 


CCS Centronics Par. Intfce & Cable 


13b 


NEC SPINWRITER 5510 RO 


2795 


C. ITOH 25 CPS DAISYWHEEL 


1750 


C. ITOH 46 CPS DAISY WHEEL 


2025 


WATANABE MI-PLOT PLOTTER 


1160 


DIABLO 630 DAISY w. P. Wheel & Rib. 


2350 



BONUS SOFTWARE SECTION! 



Let us acquaint you with MESSAGE-MAKING SOFTWARE. Just place the disk In the APPLE, enter the text, end colorful, dynamic messages appear 
on the screens of TV sets connected to the computer. Use the software to broadcast mssaapas on TV screens In schools, hospitals, fectories. store 
window, exhibit booths, etc. The following program Is our latest releese: 

SUPER MESSAGE: Creates massages In full-page "chunks". Each massage allows statements of mixed typestyles, typeslzes and colors. In mixed 
upper end lower case. Styles renga from regular APPLE cherecters. up to double-size, double-width characters with a heavy, bold font Six colors may 
be used for each different typestyle. Vertical end horizontal centering are available, end word-wrap Is eutomatlc. Users cen chain pages together to 
meXe multi-page massages. Pages can be edvenced manually or automatlcelly. Multi-page meeaagea can be stored to disc or recalled Instantly. 

REQUIRES 48K & ROM APPLESOFT $80. 

APPLE PLOTS YOUR DATA 81 KEEPS YOUR RECORDS TOOI APPLE DATA GRAPH 2,1: Plots up to 3 superimposed curves on the Hl-ree Screen 
both X & Y exes dimensioned. Eech curve consists of up to 1 20 pieces of data. Graphs cen be stored to disc and recelled Immedletely for updetlng. 
Up to 100 graphs can be stored on the seme disc. Greet for Stock-merket Charting. Buslnees Management, end Classroom Instruction! 

REQUIRES 48K a ROM APPLESOFT $38 

APPLE RECORD MANAGER: Allows complete files to be brought Into memory eo that record searches and manipulations are Instantaneous. 
Records within any file cen conteln up to 20 fields, with user-defined headings. Information can be string or numeric. User's cen browee thru files 
using page-forward, page-beckwerd or rendom-eeerch commands. Records can easily be eeerched, altered or sorted at will. Filet can be stored on the 
seme drive as the mester progrem, or on another, if a second drive Is available. Records of files cen be printed. If desired. Additional modules coming 
are a STATISTICS INTERFACE. CHECKBOOK. MAILING LIST A DATA-ENTRY. 

REQUIRES 48K & ROM APPLESOFT $40 

APPLE LITERATURE DATABASE: allows rapid retrieval (vie keywords) of referencaa f rom total APPLE literature thru 1980. on 6.28" dlek. Eech 
entry In the data beee consists of the ertlcle. euthor-neme, perlodlcel-neme, dete of Issue, a page not. The detebete Is Intended to support large maga- 
zine files which would require lengthy manual searching to recover information. Annuel updates will be evelksble. 

REQUIRES 48K. ROM APPLESOFT $80 

WORDPOWER: Is a simple, powerful, low cost, llne-orlented word-proceseor proerem. It offeree feet machine lenguage FIND a REPLACE. Text cen 
be listed to screen or printer, with or without line-numbers. Lower-cese edeptort ere supported. You can marge files, move groups of lines, end easily 
add. change, or delete lines. WORDPOWER cen be used to creett end maintain EXEC files. It can also be uead as e rapid, unstructured, Irrformetlon- 
storege and retrieval system via Its rapid search capabilities. 

REQUIRES: 48K. ROM APPLESOFT $50 

LA8ELMAKER: allows users to quickly create address labels. A given lebel mey be generetad In any quantity from 1 1 to 32787. Space is allowed on 
labels for a personal and company name, but the space Is autometlcally cloaed up If only a pereonel neme Is entered. Specs is also snowed tor foreign 
countries. The progrem cen also generate lebels for price-tags, part numbers end me 1 1- messages such as "RUSH . ■ FRAGILE .etc A self- 
Incrementing feeture allows theetre-tlcketa to be produced, with e dete. and numbers running from eOOO to z989. An editor Is provided tor editing 
lebels prior to printing. All labels may be saved to disk for Instant recall. 
REQUIRES 48K & ROM APPLESOFT $36 



TO ORDER: Use phone or mail. We accept VISA, MASTERCARD, COD's, personal 
checks & money orders. Add 4% for credit card. Customer pays handling on COD orders. 
Foreign orders must be in American Dollars & include 10% for handling. Connecticut 
residents add 7.5% sales tax. 



CONNECTICUT INFORMATION SYSTEMS CO. 
218 Huntington Road, Bridgeport, CT 06608 (203) 579-0472 
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Why do unnecessary surgery 
on your Apple? 



Sooner or later, you're going to need a 16K 
memory-expansion for your Apple. When you 
do, we suggest you buy it on the card that doesn't 
require poking about on the motherboard — nor 
removing a RAM chip, installing a strap, etc. 

The Ramex 16 RAM Board just plugs in. It's 
simple, reliable, and does its own memory 
refresh, with no additional connections. 

Run Pascal, Fortran, FP, INT and j^fl^w 
other alternate languages, 56K & 
CPM with a Z80 Softcard, increase 
usable memory for Visicalc by 16K. 
The possibilities are endless. Do 
it with the finest, closed-track 
engraved, epoxy sealed, 16K 



Apple and Applesoft are registered trademarks 'if Apple 

Computer. Inc Pascal is a registered trademark of the Resents of 
the u, of C . San Diego Visicalc Is a registered trademark of 
Personal Software CPM is a registered trademark of Distal 
Research. Inc Z80 is a registered trademark of Zilos. Inc 
Softcard is a registered irademark of Microsoft 



board available — the Ramex 16. And do 
it without unnecessary surgery on your Apple. 

In spite of its quality, the Ramex 16 costs less 
than most other expansion boards— just 
$139-95. And it comes with a one year limited 
warranty, instead of the usual 90 days. 



G 




et the Ramex 16 from your local dealer, 
or order direct. Visa and Mastercard 
holders call toll-free, 1-800-835-2246. 

i OVi/V 

OAAEGA MICROWAREJNC. 

222 SO. RIVERSIDE PLAZA 

CHICAGO. IL 60606 

312-648-1944 



Look, ma, 
no straps! 
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Short Subjects 



KEYSORT for BASIC 4.0 
A Disk Menu Program 
Auto-Run-Wedge for the PET 



by Gordon Campbell 

by David C. Oshel 

by Werner Kolbe 



KEYSORT 
for BASIC 4.0 

Gordon Campbell, Willowdale, 
Ontario, Canada 



One of the most powerful utility pro- 
grams published for the PET appeared 
in MICRO (23:11) — Rev. James 
Strasma's KEYSORT. Unfortunately, 
converting the program to work with 
BASIC 4.0 requires a lot of work. But, 
this difficulty can be overcome with 
the approach presented here. 

The problem is that strings are 
stored differently under BASIC 4.0 than 
under earlier BASICs. At the end of a 
string there is a backward pointer 
which is used to speed up garbage col- 
lect. KEYSORT doesn't move strings 
around, it just changes the array 
pointers. Consequently, the backward 
pointers are incorrect. If the PET tries 
to do a garbage collect, it might crash. 
You could change the KEYSORT pro- 
gram to fix up the pointers, but you'll 
find that modifying the BASIC program 
is easier. 

Listing 1 is a simple demonstration 
of using KEYSORT on a new PET. The 
steps in this example are: 

1. Read in the file to be sorted. 

2. Compress strings to the top of 
memory. 

3. Seal off the strings. 

4. Invoke the sort. 

5. Write out the sorted file. 

6. Reset memory pointers. 

My version of KEYSORT includes 
element zero in the sort. My PET has 
normal memory where most PETs have 
ROM sockets, so I have relocated the 
sort to this area. The sort includes null 
elements. 

The key to making the sort operate 
on BASIC 4.0 is in steps 2 and 3 above. 



The statement, X equals FRE(O), forces 
all strings to be compressed to the top 
of memory. They are sealed off by re- 
setting the top of memory at the same 
place as the bottom of the strings. 
Therefore, none of these strings are 
eligible to participate in garbage collec- 
tion. Then, when the sort is completed, 
it doesn't matter that the backward 
pointers are incorrect. Before the pro- 
gram ends, the top of memory is reset 
to its original value. (Otherwise, you 
would permanently lose the memory 
which we sealed off.) Then, to make no 
errors occur, the variables are cleared. 



1 oo 
1 10 

120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 

sso 

590 



KEYSORT WITH BASIC 4.0 



BY GORDON CAMPBELL 



REM 

REM 

REM 

REM 

REM 

REM STEP 1: READ IN THE FILE TO SORT 

REM 

DIM S*<1000>: REM ARRAY TD SORT 

OPEN 8,8,8, "FILE": REM FILE TO READ 

INPUTt»8,S»<N> 

EF = ST: REM END OF FILE- 

N = N ■• 1 

IF EF=0 THEN 190: MORE FIELDS 

CLOSE 8 

REM 

REM 

REM STEP 2: COMPRESS STRINGS 

REM 

X = FRE<0> 

REM 

REM 

REM STEP 3: SEAL OFF THE STRINGS 

REM 

X = PEEl (52): REM SAVE 

Y = PEEK (53): REM POINTERS 

POtE 52, PEEK (48): REM SEAL OFF 

POKE 53, PEEK < 49): REM STRINGS 

REM 

REM 

REM STEP 4: 

REM 

SYS lO* 4096 

REM 

REM 

REM STEP 5: 

REM 

OPEN B,8,8, 



INVOKE THE SORT 



WRITE OUT SORTED FILE 



"0:SDRTED FILE,S,W" 



FOR J=0 TO 1000 

IF S*(J) = "" THEN 500: SKIP NULLS 

PRINT»8, S*(J) 

NEXT 

CLOSE 8 

REM 

REM 

REM STEP 6: RESET MEMORY POINTERS 

REM 

POKE 52, X: REM RESET TOP 

POKE 53, Y: REM OF MEMORY 

CLR: REM KILL BAD STRINGS 

END 



A Disk Menu 
Program 

David C. Oshel, 1219 Harding Ave., 
Ames. IA 50010 



Most of the disk directory management 
programs I've seen involve flashy 
READ/WRITE track sector subroutines 
which deal with disk files directly. The 
costs are high, both in terms of pur- 
chasing, and in comprehension and 
utility. 

The twenty lines of Applesoft 
which follow provide an elegant and 
powerful alternative. 

The program creates a dynamically- 
numbered Disk Menu which is suscep- 
tible to immediate insertion, deletion 
or rearrangement of any of the dis- 
played menu items. You may arrange 
your programs at will, in alphabetical 
or logical groupings. Further, you may 
display a program description rather 
than the terse and sometimes cryptic 
catalog title under which the program 
actually runs. Moreover, if your catalog 
contains a suite of programs which call 
each other, you only need to display the 
primary program of the system, cutting 
your menu length by three-fourths in 
some cases. While your catalog may 
show confusion, your menu is logical, 
orderly and concise! 

Menu entries take the form of 
paired items in DATA statements at 
the end of the program. There is no 
limit on the number of items which 
may be included, subject to disk space. 
An "empty" menu is valid, while long 
menus are displayed over subsequent 
screen pages, each dynamically- 
numbered. 

The first item in each DATA pair is 
the program's menu description. The 
second item in the DATA pair is the 
program's catalog name, the name 
under which it runs. There must be 
two entries for each program in the 
menu, even if one of them is null (that 
is, " "). Also, some care must be taken 
when entering DATA statements to 
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enclose each item in quotes; a missing 
quote will truncate a lengthy menu, or 
produce other peculiar effects. In- 
cluding an initial period in the catalog- 
name DATA field will suppress DOS, 
and allows the corresponding menu 
description to be a non-executing 
documentation line! 



RUN, BRUN and EXEC are valid, 
with two items of interest. First, a 
machine language utility program which 
initializes and returns (normally) to 
BASIC, will initialize and return to the 
menu via the "File Check" statement. 
You must then exit the program to get 
at your utility program. Secondly, 
EXEC will "pend," as it was designed 
to do, until the program again calls the 
keyboard for input, at which time the 
EXEC will commence. The delay is dis- 
concerting the first time you sec it, and 
the "File Check" message in this case 
is also normal. 



One warning: You may dislike the 
POKE 1012,0 statement in line 20. 
This causes the disk to reboot whenever 
RESET is hit, returning you to your 
HELLO program. In my case, all my 
disks include this menu program as the 
HELLO program. I like the "turnkey" 
feel of a disk containing many other- 
wise autonomous programs. The POKE 
may be deleted with no ill effects. 



The POKE 216,0 in line 130 re- 
enables normal error messages before 
exiting the program. 

Auto-Run-Wedge 
for the PET 

Werner Kolbe, Hardstr. 77. CH 5432 
Neuenhof, Switzerland 

Recently I bought a CBM 3040 floppy 
disk. I do not have BASIC 4.0 because 
the ROMs do not fit into my old PET's 
hardware. Therefore, my first key- 
strokes after switching on are always 
the same: 

LOAD"*", 8 

to load the DOS, support the "wedge" 
from disk and 

RUN 

I wanted to save some of the work 
— at least the RUN. I discovered the 
following trick from a program I had 
analyzed. 

The machine code of the wedge con- 
sists of two parts: the first one is a jump 
instruction which is put into the CHR 
GET routine of PET's BASIC located at 
$70. The second part loads into the 
high RAM memory (for example from 
$7E52 to $8000 for a 32K PET). 



What you have to do is create a pro- 
gram file that starts loading at $70 then 
makes a gap and continues to load into 
the upper part of the memory. The first 
part is easy. You open a program file 
and the first two bytes you write on it 
are the start address. In your case, this 
will be CHR$(112) and CHR$|0), 
which is S0070. The following bytes 
that you print onto the file are the 
' ' program . ' ' You have to enter the jump 
instruction and continue with PET's 
standard zero page setup until you 
come to $FB,FC, which is the "load 
pointer." By changing this pointer you 
get the necessary gap. 



For example, if you put $7D into 
$FC, the following bytes will be loaded 
at the location $7DFD and beyond it. 
Note that it is not possible to change 
the low part of the load pointer also. In 
a first attempt, I tried to put $7E52 into 
it. PET crashed because after loading 
$52 into $FB the load was continued at 
$0052, and $FC remained unchanged. 



Here is how it is done: 

1. Step: Reset the PET, switch it off 
and on again. 

2. Step: Load your wedge into PET and 
run it. 



5 REN 



A DISK MENU PROGRAM 



BY DAVE OSHEL 



27. 1981": PRINT 
"RETURN FOR NEXT PAGE": 



NORMAL : VTAB 5 



110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

1000 

1010 

1020 

1030 



+ ii PRINT 
") "!AN$:AN2 = 



GOTO 30 



INT ( VAL (AN*)): IF (AN* < 1 OR ANZ > I) AND AN* 



10 D* = CHR* (4) 

20 PRINT D*"N0H0NIC0": POKE 1012,0: DIM P*(15,2) 

30 PGZ = l:SWX = 0: 0NERR GOTO 80 

40 TEXT : HOME : PRINT "DISK MENU 1001 [ APRIL 

50 PRINT "PAGE "PG2: INVERSE : VTAB 23: HTAB 10: PRINT 

60 FOR I = 1 TO 14: IF I < 10 THEN PRINT " "; 

70 READ Pt(I.O): READ P$(I,1): PRINT I* - "P$(1.0): NEXT I: GOTO 90 

80 Sltt = 1 

90 PRINT I" - EXIT THIS NENU":PGX = PG7. 

100 PRINT "WHICH. PLEASE? (1-"1;: INPUT 

( PEEK (37)): CALL - 368: GOTO 100 

IF AN* = "" AND SWX = 1 THEN RESTORE 

IF AN* = " THEN 40 

IF ANX = I THEN VTAB 23: CALL - 958: POKE 216,0: 0<D 

0NERR GOTO 160 

PRINT D*"RUN"P*(AN7.,1) 

0NERR GOTO 180 

PRINT D*"BRUN"P*(AW7.,1) 

0NERR GOTO 200 

PRINT D*"EXEC"P*(ANM) 

PRINT : CALL - 958: PRINT "FILE CHECK => "PHM.A): FOR I = 1 TO 2500: NEXT : RESTORE : GOTO 30 
REM ILLUSTRATIVE DUMMY MENU 

DATA "EXAMPLE 1: PROGRAM NOT ON DISK", "CANTERBURY TALES" 
DATA "EXAMPLE 2: THIS PROGRAM", "DISK MENU PROGRAM" 



"" THEN VTAB 



DATA "« EX 3: HOUSEKEEPING MEMOS FORMAT", ".PERIOD SUPPRESSED DOS" 
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3. Step: Type in the Shifter program, 
listing 1, run it and save it. (You 
may need it again if you make a 
mistake in one of the following 
steps). 

4. Step: Jump into the resident 
monitor and enter the bytes listed in 
listing 2. Save them with the mon- 
itor for the same reason as above. 
(S"1:BYTES",08,056E,0642). 

5. Step: Type in the Wedge-Saver pro- 
gram, listing 3, save it, put an empty 
formatted disk into drive 1 and run it. 

Now your "wedge" is ready. Test 
it! Reset the PET, put the disk into 
drive and enter LOAD "*",8. Then 
enter > $, and see that it works. If it 
doesn't, repeat the steps above and 
check every byte carefully. 

You might think this is a lot of 
work just to save a RUN, but if you 
have prepared your wedge file once, 
you may copy it on all your disks like 
any other program file. 

In the Shifter and in the Saver there 
are several PEEKs and POKEs, which 
are necessary because of the various 
PETs' memory sizes and wedge ver- 
sions. Now the whole process should 
work independently of that, and the 
wedge will load into the upper end 
automatically. 



Listing 1: Shifter 



1 e fl=PEEK <! 52 > +256*PEEK < 53 ) + 1 

1 5 B=PEEK '- 52 > +6*256+ 1 • C= <-. PEEK (53) +2) *256-fi 

29 FOR I =0TOC : POKE < I +E > , PEEK (I+R> : NEXT 



Listing 2: Enter with MLM C* PC SR AC KR VR SP NV*BHIZC 
,; C6FB 33 00 00 00 FE 001 100 11 








1 


2 


3 


4 


5 


6 


7 


056E 


70 


00 


4C 


FD 


7D 


02 


E6 


78 


0576 


AD 


09 


02 


C9 


3R 


BO 


Oft 


C9 


057E 


20 


F0 


EF 


38 


E9 


30 


38 


E3 


05S6 


DO 


60 


80 


4F 


C7 


52 


00 


00 


058E 


20 


CI 


2E 


E6 


13 


90 


EO 


36 


0596 


00 


IB 


00 


2ft 


01 


FF 


00 


00 


059E 


00 


00 


00 


11 


00 


18 


10 


3F 


05fl6 


IB 


01 


03 


20 


00 


00 


27 


00 


S5flE 


00 


00 


03 


00 


00 


5E 


00 


00 


05E6 


00 


00 


00 


00 


03 


00 


00 


00 


05BE 


00 


00 


00 


00 


00 


08 


CO 


S3 


05C6 


11 


00 


'34 


ftB 


HF 


00 


00 


00 


05CE 


00 


00 


00 


01 


OE 


60 


08 


27 


05D6 


00 


06 


IS 


43 


01 


02 


00 


00 


05DE 


00 


00 


80 


80 


SO 


38 


SO 


80 


05E6 


80 


81 


SI 


31 


81 


81 


81 


82 


05EE 


82 




82 


Oc 


S2 


82 


S3 


83 


05F6 


S3 


83 


83 


00 


00 


FE 


73 


R2 


05FE 


52 


S6 


71 


Cft 


36 


34 


E6 


-j.-, 


0606 


R5 


72 


85 


35 


R3 


81 


85 




060E 


A9 


04 


85 


29 


R9 


00 


ft8 


91 


0616 


28 


CS 


91 


28 


R5 


23 


13 


63 


061E 


02 


85 


2ft 


R5 


29 


63 


00 


85 



0626 2B R5 34 fl4 35 85 30 84 
062E 31 05 2ft ft4 2B 35 2C 34 
0636 2D 85 2E 84 2F 20 30 C7 
063E 6C 71 00 00 flfl ftft FiFI fifi 
Listing 3: Wedge-Saver 

10 POKE43,8-PO:<E42,0 : C~R-O?E:-2,S,3, "VH1W£j-?,'A" 

15 P0KE1394,PEEK<53>-1 •P0KE;532, ; 'EEK':53>-1 

20 POKE 1 534 , PEEK < 52 ) + 1 

30 FORI=1390TG2049 : PRI -T=*2, CHRSC°EZK< I J > I '■ NEXT • CL0SE2 
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TTACK 




'Apple II is a trademark of Apple Computer, Inc. 



VISA/MASTERCHARGE accepted. $1.00 shipping/ 

handling charge. (Calif, residents add 6% tax) [^'•5) 000-7160 



Try one game and you're 
caught in its irresistable web of 
fun. More habit forming than 
peanuts. More fun than gorging 
on hot fudge sundaes. More ex- 
citing than anything like it. 

SNACK ATTACK won't just 
a-maze you, it'll 3-maze you! Win 
the first level, and up pops a new, 
faster version, with a more in- 
tricate maze. And for more 
challenge there are doors you can 
enter and they can't. Doors they 
can dash thru and you can't. 

SNACK ATTACK ... by Dan 
lllowsky, the game that defies 
anyone to stop after just one 
game! 

$29.95, for Apple II* 

At computer stores, or from: 

DATAMOST 

19273 Kenya St. 
Northridge, CA 91326 



/AlCftO 



Dealer Update January, 1982 



Presented here in zip-code order are 
those MICRO dealers who responded 
to our newsletter request for informa- 
tion concerning their dealership. 
Many have been MICRO dealers for 
quite some time while others are new. 
This service is provided to acquaint 
readers with these dealers and to en- 
courage readers to visit dealers in 
their area. This listing is provided 
twice a year to update previous 
listings (see MICRO 35:51). This is not 
intended as a complete listing of 
MICRO dealers. 

United States 

New Jersey 

The Computer Forum 

80 Broad St. 

Red Bank, New Jersey 07701 

Contact: Steve Morse 

201/530-9103 

Services: Courses/Seminars 

Hardware: Apple, Atari, CBM, PET 

Software: Business, Personal, 

Educational, Games 

New York 

The Computer Corner 

200 Hamilton Ave. 

White Plains, New York 10601 

914/WHY-DATA 

Services: Seminars, Service Dept. 

Hardware: Apple 

Software: Business, Personal, 

Educational, Games, Other 

Computer Microsystems 
1196 Northern Blvd. 
Manhasset, New York 11030 
Contact: Andrei Rozwadowski 
516/627-3640 

Hardware: Apple, CBM, PET, North- 
star, Micromation 
Software: Business, Personal, 
Educational, Games 

Computer Shop 

207 Boices Lane 

Kingston, New York 12401 

Contact: Clemens Haneke 

914/336-8411 

Hardware: Apple, Atari, Compustar, 

Intertec 

Software: Business, Personal, 

Educational, Games 



Computerland/lthaca 

225 Elmira Rd. 

Ithaca, New York 14850 

Contact: Ben Herrmann 

607/277-4888 

Services: User's Software Library 

Hardware: Apple, IBM 8088, Xerox 280 

Software: Business, Personal, 

Educational, Games 

Pennsylvania 

Computer Store of Pittsburgh 

612 Smithfield St. 

Pittsburgh, Pennsylvania 15222 

Contact: Art Vaughan 

412/391-8050 

Hardware: Apple, Atari, Northstar, 

Zenith, Dynabyte, HP 

Software: Business, Personal, 

Educational, Games 

The Computer Spot 

On the Diamond 

Ligonier, Pennsylvania 15658 

Contact: Harold Newell 

412/238-2381 

Hardware: Apple 

Software: Business, Personal, 

Educational, Games 

Computers Unlimited 
2813 East Prospect Road 
York, Pennsylvania 17402 
Contact: Keith C. Kirn 
717/755-1045 

Hardware: Apple, CBM, PET 
Software: Business, Personal, 
Educational, Games 

Maryland 

The Computer Forum 
569 Baltimore-Annapolis Blvd. 
Severna Park, Maryland 21146 
Contact: Virginia Stibolt 
301/544-0909 

Services: Education, Rental 
Hardware: Atari, CBM, PET, Osborne 
Software: Business, Personal, 
Educational, Games (software sup- 
port for Apple, TRS-80, Osborne) 

Computers Unlimited 

907 York Road 

Towson, Maryland 21204 

Contact: Philip Lester 

301/321-1553 

Hardware: Apple, CBM, PET 

Software: Business, Personal, 

Educational, Games 



Virginia 

Community Computers 
2704 N. Pershing Drive 
Arlington, Virginia 22201 
Contact: J. Michael Versace 
703/527-4600 
Hardware: OSI 

Software: Business, Personal, 
Educational, Games 



North Carolina 






Byte Shop 

218 N. Elm St. 

Greensboro, North Carolina 27401 

Contact: Bob Terrell 

919/275-2983 

Services: Service Center for Apple, 

Epson, Commodore 

Hardware: Apple, Atari, PET, 

Microtek, Epson, Mountain 

Computer 

Software: Business, Personal, 

Educational, Games 

Georgia 

Atlanta Computer Mart 

5091 Buford Highway 

Atlanta, Georgia 30340 

404/455-0647 

Hardware: Apple, Atari, Northstar, 

California Computer Systems, Ithaca 

Intersystems 

Software: Business, Personal, 

Educational, Games 



Florida 






SEB Computers 

1705 University Blvd. N. 

Jacksonville, Florida 32211 

Contact: Sam Bateh 

904/743-7050 

Services: Consulting 

Hardware: Apple, Atari, CBM, PET 

Software: Business, Personal, 

Educational, Games, Custom 

Programming 



Al Personal Computers 

178 Oxford Rd. 

Fern Park, Florida 32730 

Contact: Pete Bender 

305/339-8914 

Services: Atari Service Center 

Hardware: Apple, Atari, CBM, VIC, 

TRS-80, Eagle, Xerox 

Software: Business, Personal, 

Educational, Games 
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Computer Store 

2620 East Robinson Street 

Orlando, Florida 32803 

Contact: Jim Lewis 

305/894-8357 

Services: Custom Programming, 

Vocational Programming Classes 

Hardware: Apple, Atari, CBM, 

TRS-80, IBM, Vector Graphic 

Software: Business, Personal, 

Educational, Games, Scientific 

Associated Information Systems 

825 Osceola Dr. 

Rockledge, Florida 32955 

Contact: David R. Hendricks 

305/632-1090 

Services: Computer Service Bureau 

Hardware: OSI, Epson, Amdex, 

Hazeltine, ATV, D.P. Supplies 

Software: Business, Personal, 

Educational, Games, Custom 

Programming 

Michigan 

Computer Center 

28251 Ford Rd. 

Garden City, Michigan 48135 

313/425-2470 

Hardware: Apple, Atari 

Software: Business, Personal, 

Educational, Games 



New Dimensions In Computing Inc. 

541 E. Grand River Ave. 

E. Lansing, Michigan 48823 

Contact: Robert Gibbs 

Claus Buchholz 

517/337-2880 

Services: Repair 

Hardware: Atari, Vector Graphic Z80, 

Exidy Sorcerer Z80, Paper Tiger and 

Epson Printers 

Software: Business, Personal, 

Educational, Games, Books 

Iowa 

Cyberia Inc. 

2330 Lincoln Way 

Ames, Iowa 50010 

Contact: Dolores Keith-Taylor 

515/292-7634 

Services: Software Development, 

Service Department, Consultation 

Hardware: Apple, CBM, PET 

Software: Business, Personal, 

Educational, Games, Agricultural 

Computerland 

3271 Armar Dr. 

Marion, Iowa 52302 

Contact: Frank Malone 

319/373-1241 

Services: Seminars, Training 

(in-store) 



Hardware: Apple, Atari, CBM, Xerox, 
SAM, 8088, IBM Personal Computer, 
Vector Graphics 
Software: Business, Personal, 
Educational, Games 



Wisconsin 

Colortron Computer Division 

2111 Lathrop Ave. 

Racine, Wisconsin 53405 

Contact: Lance Evans 

414/637-2003 

Services: Custom Programming and 

Consulting 

Hardware: Apple, CBM, PET 

Software: Business, Personal, 

Educational, Games 

Century Computer/Phone Concepts 

117 South 4th St. 

La Crosse, Wisconsin 54601 

Contact: Dan Saugstad 

608/785-2010 

Services: Custom Programming, 

Bulletin Board Service (1982) 

Hardware: Apple, Atari 

Software: Business, Personal, 

Educational, Games 

(Continued on page 81) 






UNTY FAIR 



COUNTY TERRIFIC 



The only thing missing is cotton candy 

You're on the midway, and here's o 
chance to show your skill. You pick up your 
rifle and bang away. Seems easy . . . but! 

Duf , wotch those ducks! They're sneaky as 
all get out. They'll gobble up your bullets 
and leave you with an empty gun and a low 
score. And don't miss the rabbits . . . they 
multiply like crazy. 

Come on, join the crowd . . . with enjoy- 
able, fascinating graphics the whole family 
will love. 



JTtDO 

(California residents odd i 



County Fair by Dan lllowsky For Apple II ". 
Just $29.95 at computer stores, or: 



DATAMOST 

'19273 "Kenya St. 

NorthrTdge, Co 91326 

(213)366-7160 



"Apple II is o trademark of Apple Computer. Inc. 
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A 

Wooden 

Computer? 



Not from Commodore! 

So why should the desk look like wood? A pleasant 
cream and charcoal trimmed desk looks so much better 
with Commodore systems. One look and you'll see. 
Interlink desks are right. By design. 

The specifications only confirm the obvious: 



•Cream and charcoal 
color beautifully matches 
the Commodore hardware 
and blends with your 
decor. 

•An ideal 710 mm (28") 
keyboard height yet no 
bumping knees because a 
clever cutout recesses the 
computer into the desk- 
top. 

•High pressure laminate 
on both sides of a solid 
core for lasting beauty 
and strength. 
•Electrostatically applied 
baked enamel finish on 
welded steel legs— no 
cheap lacquer job here. 



•T-molding and rounded 
corners make a handsome 
finish on a durable edge 
that won't chip. 
•Knocked down for safe, 
inexpensive shipment. 
•Patented slip joints for 
quick easy assembly. 

• Leveling glides for 
uneven floors. 

•Room enough for a 
Commodore printer on the 
desk, yet fits into nearly 
any den or office niche— 
H: 660 mm (26") W: 1170 
mm (46") D: 660 mm (26"). 

• Matching printer stand 
available with slot for 
bottom feeding. 



PRICE: $299 

In short, as Commodore dealers, we won't settle for 
anything that looks good only in the catalog! Our 
customers won't let us. They don't buy pictures. And 
neither should you. This is why we will 1st you use ons of 
our desks for a week and then decide. If for any reason 
you don't like it, just return it In good condition for a 
cheerful refund. 



If your Commodore dsalsr dossn't carry our desks yst, 
send a check for $299 and we will ship your desk freight 
paid! 

Name 

Address 

City st Zip 



Interlink, Inc., Box 134, Berrien Springs, Ml 49103 
Master Charge and Visa welcome. Cal I our order line: 
616-473-3103 



Wtzard-IGX 

16K RAM APPLE MEMORY CARD 

Unleashes your Apple II* and Apple II Plus* computer. 



ON TO MAXIMUM MEMORY 

Wizard-16K gives your 48K 
Apple II or Apple II Plus the 
last bit of directly accessible 
add-on memory it can accept. 
And, it interfaces with all 
Z80** cards to give you 
CP/M*** 

■ Fully compatible with 
Apple II and Apple II Plus 

■ Adds 16K bytes of Random 
Access Memory (RAM) 

■ Fully compatible with Z80 
microprocessor cards 
forCP/M 

■ Used with Z80 card, it turns 
your Apple II into a two- 
microprocessor system with 
56K of usable memory 

■ With a Z80 card, it lets you 
run BASIC-80**** 



COBOL-80**** 
FORTRAN-80****. BASIC 
Compiler* * * *. and Assembly 
Language Development 
System**** plus Applesoft 
BASIC*, Integer BASIC* 
Apple Pascal System* Apple 
FORTRAN* and Apple Pilot- 
Utilizes Apple DOS 3,3* 
16-sector system to permit 
loading both Applesoft* 
and Integer BASIC* 
Compatible with 
VisiCalc"**** 
Offers all features of Apple 
Language Card* (except 
Autostart RAM) 
LED indicators show which 
banks and functions are 
selected (deselected) 
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$169.00 

AVAILABLE AT ALL FINE 
COMPUTER STORES 






Dealers {Continued from page 79) 



Minnesota 

Digital Designs 

829 3rd Ave. S.E. #265 

Rochester, Minnesota 55901 

Contact: Steve Surprenant 

507/282-3222 

Hardware: OSI, Altos (Z80) 

Software: Business, Personal, Word 

Processing, FARM Accounting 



Illinois 

DigitalWorld 

711 Army Trail Road 

Addison, Illinois 60101 

312/628-9222 

Services: Training, Service 

Hardware: Atari, CBM, PET, Xerox, 

Zenith, NEC 

Software: Business, Personal, 

Educational, Games 



Oak Brook Computer Centre 

17 W. 426 22nd Street 

Oakbrook Terrace, Illinois 60181 

Contact: Bill Colsher 

312/941-9005 

Hardware: Apple, Atari 

Software: BPI, Personal Software, 

PFS, etc., (largely business oriented) 



Data Domain of Schaumburg 
1612 E. Algonquin Rd. 
Schaumburg, Illinois 60195 
312/397-8700 

Services: Business Seminars, 
Service Dept. 

Hardware: Apple, Archives, Alpha 
Micro, Hewlett-Packard Calculators 
Software: Business, Personal, 
Educational, Games, Large Selec- 
tion of Books and Magazines 



Farnsworth Computer Center 
1891 N. Farnsworth Ave. 
Aurora, Illinois 60505 
Contact: Eleanor Snyder 
312/851-3888 

Hardware: Apple, Hewlett-Packard 
Software: Business, Personal, 
Educational, Games 



The Computer Store of Rockford 

3515 Auburn Street 

Rockford, Illinois 61103 

815/962-7580 

Hardware: Apple, Cromemco, Data 

General, Northstar 

Software: Business, Personal, 

Educational, Games 
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Missouri 

Computer Mart 

1904 E. Meadowmere 

Springfield, Missouri 65804 

Contact: Rob Lurvey 

417/862-6500 

Services: Consulting 

Hardware: Apple, IMS International 

Software: Business, Personal, 

Educational, Games 

Kansas 

Personal Computer Center 
3819 W. 95th Street 
Overland Park, Kansas 66206 
Contact: Charles Meyers 
913/649-5941 

Services: Repair Department, 
Seminars and Training 
Hardware: Apple, CBM 
Software: Businesss, Personal, 
Educational, Games 

Mr. Computer 

1424 Industrial-Emporia W. Plaza 

Emporia, Kansas 66801 

Contact: Bill or Sue 

316/342-4893 

Services: Apple and Atari Service 

Center, Classes and Seminars 

Hardware: Apple, Atari 

Software: Business, Personal, 

Educational, Games 



Amateur Radio Equipment Co. 
1203 E. Douglas 
Wichita, Kansas 67211 
Contact: Alden Lansdowne 
316/264-9166 

Services: Amateur, Experimenter 
Software: Business, Personal, 
Educational, Games 



Nebraska 

MicroAge® Computer Store 

4217 South 84th St. 

Omaha, Nebraska 68127 

Contact: Dennis Hendrickson 

402/339-7441 

Services: Consulting 

Hardware: Apple, Atari, CBM, Altos, 

Northstar, Archives 

Software: Business, Personal, 

Educational, Games 



Arkansas 

Computers Etc. 

7624 Baseline Rd. 

Little Rock, Arkansas 72209 

Contact Jerry or Sherry Baldwin 

501/562-3200 

Hardware: Apple, Z-80 NEC 

Software: Business, Personal, 

Educational, Games, Utility 



Texas 

Computer Concepts 

4699 Calder 

Beaumont, Texas 77707 

Contact Ed or May Culotta 

713/892-3992 

Hardware: Apple, Epson Printer 

Software: Business, Personal, 

Educational, Games 

Computer 'n Things 

2825 Hancock Dr. 

Austin, Texas 78731 

Contact: Gary Bellamy 

512/453-5970 

Hardware: Apple, NEC, Cromemco 

Software: Business, Personal, 

Educational, Games 

Arizona 

Personal Computer Place 
1840 W. Southern 
Mesa, Arizona 85202 
Contact: Roger L. Smith 
602/833-8949 

Services: Disk Drive Repairs, Pro- 
gram EPROMs 
Hardware: Apple, CBM, PET, 
Southwest Technical Products 
Software: Business, Personal, 
Educational, Games 

Nevada 

JBA Computers 

3111 S. Valley View Ste 1-101 

Las Vegas, Nevada 89102 

Contact: W. Street 

702/871-2999 

Services: Repair and Maintenance, 

Contracts, Custom Programming, 

Circuit Design, Consulting 

Hardware: Atari, OSI 

Software: Business, Personal, 

Educational, Games 

California 

Main-Line Computers 

1844 14th Street 

Santa Monica, California 90404 

Contact: W. Niles 

213/450-9924 

Hardware: Apple, Atari, OSI 

Software: Business, Personal, 

Educational, Games 

Computer Forum 
14052 E. Firestone Blvd. 
Santa Fe Springs, California 90670 
Contact: Dave Hayhurst 
213/921-2111 

Services: Classes, Service Depart- 
ment, Custom Programming 
Hardware: Apple, SYM 
Software: Business, Personal, 
Educational, Games 

(Continued) 
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Omni Unlimited 

105 So. Los Robles 

Pasadena, California 91101 

Contact: Don K. Fenstermaker 

213/795-6664 

Services: Service Center 

Hardware: PET, Zenith 

Software: Business, Personal, 

Educational, Games, Legal, Medical 

— Database 

The Computer Merchant 
1040 E. Valley Pkwy. 
Escondido, California 92025 
Contact: Michael Houlberg 
714/746-0662 
Hardware: Apple, Xerox 
Software: Business, Personal, 
Educational, Games 

Computerland 

289 E. Highland Ave. 

San Bernardino, California 92404 

714/886-6838 

Services: Repair, Software Training 

Hardware: Apple, Atari, IBM 

Software: Business, Personal, 

Educational, Games 



Computer Store of San Leandro 

701 MacArthur Blvd. 

San Leandro, California 94577 

Contact: Hector 

415/569-4174 

Services: Custom Software, System 

Design 

Hardware: Atari, Altos 

Software: Business, Personal, 

Educational, Games, CPM Software 



Byte Shop 

6041 Greenback Lane 
Citrus Heights, California 95610 
916/969-2983 or 5259 
Hardware: Apple, Osborne, North- 
star, Cromemco 
Software: Business, Personal, 
Educational, Games 



Computerland of Sacramento 

1537 Howe Ave. #106 

Sacramento, California 95825 

Contact: Ralph or Gail Lovelace 

916/920-8981 

Services: Computer Training 

Seminars 

Hardware: Apple, Vector, IBM, Altos 

Software: Business, Personal, 

Educational, Games 



Washington 

Personal Computers, Inc. 

South 104 Freya#104 

Spokane, Washington 99202 

509/534-3955 

Services: Custom Design Hardware 

and Software; Complete Support for 

Business Installations 

Hardware: Apple, PET 

Software: Business, Personal, 

Educational, Games 

Alaska 

BG Systems 

204 East International 

Anchorage, Alaska 99502 

Contact: Robert DeLoach 

907/276-2986 

Services: Client Accounting 

Hardware: CBM, PET, Super PET, 

VIC-20 

Software: Business, Personal, 

Educational, Games 

Juneau Electronics 

1000 Harbor Way 

Juneau, Alaska 99801 

Contact: Stan Belzak 

907/586-2260 

Hardware: Apple 

Software: Business, Personal, 

Educational, Games 
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OHIO SCIENTIFIC 

THE WIZARD'S CITY — 

search for gold in the dun- 
geons beneath the Wizard's 
city or in the surrounding 
forest. A dynamic adventure 
allowing progress in strength 
and experience. All OSI — 
cassette $12.95, disk $15.95. 
OSI HARDWARE 15% OFF 
RETAIL PRICES! 

GALACTIC EMPIRE — a strat- 
egy game of interstellar con- 
quest and negotiation. Com- 
pete to discover, conquer, and 
rule an empire with the com- 
puter or 1-2 other players. C4P, 
C8P cassette $12.95, disk 
$15.95. 

AIR TRAFFIC ADVENTURE — 

a real time air traffic simula- 
tion. C4P, C8P disks $15.95. 
Plus S-FORTH, FAILSAFE 
+ 2, RPV CONTROL, ADVEN- 
TURE, TOUCH TYPING, IN- 
TELLIGENT TERMINAL and 
more. Send for our free 
catalog including photos and 
complete descriptions. 

Aurora Software Associates 

— s-i 37 S. Mitchell 
"■■ Arlington Heights 
m Illinois 60005 



CBM/PET? SEE SKYLES ... CBM/PET? 



PET owners everywhere sing 

Jyl Thanks for the Memories J J 
to good old Bob Skyles 

...they should ... because Bob Skyles is the only complete 
source for memory boards for any PET ever sold. Old Bob 
won't forget you. 

And ihe Skyles memory systems have the highest quality control of any computer prod- 
uct ever. Over 100 million bits of Skyles memory boards arc already in the field; you can 
count the total number of failures on the fingers of one hand. First quality static and 
dynamic RAMS, solid soldered on first quality glass cpoxy. That is why they are guaran- 
teed — in spile of the new lower prices — for a full two years. 

The boards connect directly to the data bus on your board with ribbon cable and 50 pin 
connectors that keep the data bus open to the outside world. Installs in minutes without 
special tools or equipment . . .just a screwdriver. 

Because of our new dynamic memory design, and to celebrate the Skyles' Third Annual 
Survival Anniversary, here are the smashing new prices: 

The 8K Memory System originally $250.00 now $200.00 Save $ 50.00 

The 16K Memory System originally $450.00 now $300.00 Save $150.00 

The 24K Memory System originally $650.00 now $400.00 Save $250.00 

. . . For any PET ever made. When ordering, just describe your PET by model number 

and indicate the amount and type (or brand) of memory currently in the unit. 

Shipping and Handling (USA/Canada) $3.50 (Europe/Asia) $15.00 

California residents must add 6%/6'A % sales tax, as required. 



Skyles Electric Works 

2.1 1 f. South Whisman Road 
Mountain View, California 94041 
<415) 965-1735 



Visa/Mastercard orders: call tollfree 
(800) 227-9998 (except California). 
California orders: please call (415) 
965-1735. 
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A NEW 
STAR ON THE 
HORIZON 




The Applesoft Compiler 
from Southwestern Data Systems 



derating speed, of your Applesoft p;<. ; : 

It works simply, quickly and automatically — 

and it offers these important features: 

• Compiles at approximately 1200 lines per 
minute - many times faster than most 
other Apple compilers since the disk is 
not accessed during compilation 

• Full support for DOS commands, Error 
Messages, and Graphics 

• Special "Compile to Disk" mode allows 
compilation of programs too large to be 
done in memory 

• Unique selective chaining option allows you 
to pass just the variables you want to 
subsequent programs. Because SpeedStar 
converts Applesoft programs to binary files, 
you can also have any number of programs 
in memory at once. Compiled programs can 
also be used via CALLs as subroutines in 
ordinary Applesoft programs. 

• Unlimited user back-up copies 



Set lyjoftE than ygi 

When you buy SpeedStar from SDS, you get 
more than just a great Apple compiler - you 
get a team of utility software specialists ready 
to help you solve your software problems. The 
SDS name is your assurance of quality and 
service — before and after the sale. 

Each SpeedStar package includes a program 
diskette with complete documentation 
enclosed in an attractive padded notebook. 
Each manual is fully indexed with tab dividers 
for quick and easy reference. Easy-to-follow 
examples will make you a SpeedStar pro 
in no time. 

REQUIREMENTS 

A 48K Apple II with Applesoft in ROM or 
equivalent. Please specify DOS 3.2 or 3.3. 



$134.95 



SpeedStar is at your local dealer NOW. If he's 
out of stock, have him give us a call and we'll 
ship your copy the same day. 
SpeedStar . . . ask for it by name. 



sautnuuesteRri 
data 



■ Apple II and Applesoft Basic are trademarks of Apple Computer, Inc. 



P.O. Box 582-M, Santee, CA 92071 • 714-562-3670 



SOUTHEASTERN MICRO SYSTEMS 



1080 IRIS DRIVE 

CONYERS, GEORGIA 30207 

404-922-1620 



ST-02 
VIDEO BOARD 



SCREEN FORMAT 

ST-02 HAS FOUR SCPEEN FORMATS SWITCH SEI.ECTABLE: 



CHARACTER FORMAT 

ST-02 HAS TWO CHARACTER GENERATORS: 

- HC6674 5x7 Matrix 

- 2716 User Programmable 5x7 

Matrix 

CHARACTER GENERATORS ARE SWITCH SELECTABLE 
ON RESET OR MAY BE CHANGED UNDER SOFTWARE 
CONTROL . 



JO WPOT/OUTPUT 

KEYBOARD INPUT IS 7 OR 8 BIT ASCII ENCODED WITH 

ACTIVE LOW STROBE. 

TERMINAL IS STANDARD RS-232. 

SELECTABLE BAUD RATES OF 300, 600, 1200, 2400, 

4800, 9600. 

PRINTER OUTPUT IS PARALLEL 7 OR 8 BIT WITH ACK . 
THIS PORT HAY BE USED AS SERIAL TO PARALLEL 
CONVERTER OR MAY BE USED IN SCREEN PRINT FUNCTION. 



THE ST-02 IS A STAND ALONE VIDEO CONTROLLER 
UTILIZING THE 6802 CPU AND 6845 VIDEO CONTROLLER. 

THE SIZE OF THE BOARD IS 7k" X 6k". 

POWER SUPPLY REQUIREMENTS: 3 amps 9 +5 vdc 
100 ma. 9 +12 vdc 
100 ma. 9 -12 vdc 

VIDEO OUTPUT IS COMPOSITE VIDEO 



CONTROL CHARACTERS 



CURSOR FORMAT 



BLOCK CURSOR 
NON-BLINK CURSOR 
BLINKING BLOCK 



UNDERLINE CURSOR 
BLINKING CURSOR 
BLINKING UNDERLINE 



CTL J - LINE FEED 

CTL Z - CLEAR SCREEN 

CTL K - UPLINE 

CTL G - BELL 

CTL H - BACKSPACE CURSOR 



CTL L - FORWARD SPACE CURSOR 
CTL M - CARRIAGE RETURN 
CTL N - KEYBOARD UNLOCK 
CTL O - KEYBOARD LOCK 
CTL A - HOME CURSOR 



ESCAPE COMMANDS 



SEND CURSOR LOCATION 
CURSOR POSITION REQUEST 
IHVERSfi VIDEO 
ACTIVATE PRINTER 



DEACTIVATE PRINTER 

PRINT SCREEN 

ACTIVATE CRT 6 PRINTER 

SWITCH CHARACTER GENERATOR ROMS 



THESE ARE ONLY A FEW!!! 



US SHIPPING $3.50, FOREIGN ADD 10% 
(US FUNDS ONLY) 



Assembled 
$325.00 

Kit 

$275.00 

Char. Gen. 2716 Eprom 
$15.00 



Bare Board 
With Monitor EPROM 



$100.00 

Bare Board 
$75.00 



Master Charge, Visa, American Express Accepted 



NIKROM TECHNICAL PRODUCTS PRESENTS 

A DIAGNOSTIC PACKAGE FOR THE APPLE il 

AND APPLE II + COMPUTER. 

"THE BRAIN SURGEON" 

Apple Computer Co. has provided you with the oesl equipment available to date. The 
Diagnostic's Package was designed to check every major area ol your computer, detect errors, 
and report any maiiunctions The Brain Surgeon wilt put your system through exhaustive, 
thorough procedures, testing and reporting at) findings. 

The Tests Include 



• MOTHERBOARD ROM IES' 

• APPLESOFT ROM CARD TEST 

• INTEGER ROM CARD TEST 

• MOTHERBOARD RAM TESTS 

• DISK DRIVE SPEED CALIBRATION 

• DISK DRIVE MAINTENANCE 

■ DC HAYES MICROMOOEM II TEST 
(HARDWARE A EPROM) 

• MONITOR & MODULATOR ROUTINES 
- MONITOR SKEWING TESTS 

• MONITOR TEST PATTERN 

• MONITOR TEXT PAGE TEST 



■ MONITOR & TV YOKE ALIGNMENT 

■ LO-RES COLOR TESTS 

• HIRES COLOR TESTS 

• RANDOM HIRES GENERATOR 

• SPEAKER FUNCTK5N TESTS 

• SQUARE WAVE MODULATION 

• PADDLE & SPEAKER TEST 

• PADDLE & BUTTON TEST 

• PADDLE STABILITY 

• INTERNAL MAINTENANCE 

• GENERAL MAINTENANCE 

• ON BOARD ■HELP"' 



The Brain Surgeon allows you to De confident of your system. This is as critical as the 
operating system itself You musl depend on your computer 10OV0 of it's running lime. The 
Brain Surgeon will monitor and help maintain absolute peak performance 

SuppiiM on diskette with complete 
00c umaflU Hon and maintenance guide 

PRICE S49 95 

REQUIRES 48K. FP m ROM 

1 DiW Onve. DOS 3 2 C- 3 3 

Nikrom Technical Products 

25 PROSPECT STREET • LEOMINSTER. MA 01453 

Call Tolt-Fne Now! 

Master Ciaine & VISA use's call I-80043S2246 
Kansas Res-denis call t -600-36? 2421 




for th« Appl* II 
Special Introductory Prtc« to ond January 31, 1982 



i* SC«i»l NUMBiR IS BElOW MQDO OB 0AI(0 

»t'0*t Z'VBi T»E*RftURWOl$*C»I(PlLISl»C0 
US WO0KWIQ" 



Pegasys Systems Inc has been mar- 
keting its version ot P-USP since May 
1°81 al the introductory price ot 
$99.95. On February I, 1982. we 
must increase this price lo $199.95. 
You have this tinal opportunity to 
order Ihe tales! floating point 
HI-RES graphics version ot P-USP at 
Ihe old price (Please speedy DOS 
version) 

Our version ol P-LISP has been 
acknowledged as the lines! and 
most complete available tor Apple 
micro- computers, and. with the ad 
ditlon ol floating point math and 
HI-RES graphics, it becomes an 
indispensable lool lor educalors 
scientists, business executives, 
mathematicians, or applications 
requiring arlificial intelligence 
Included is a ninety page users 
manual which will aid you In creal 
ing your P-LISP programs This man 
ual is also available separately lor 
$20.00, which is lully relundable on 
purchase ol the program 



P-LISP will run on a 32K or larger 
APPLE II / II ■ and will take advan- 
tage ol A_LL available memory 
Supplied with the interpreter are 
several sample programs including 
a complete ELIZA 

For those ol you who do not fully un- 
derstand P-USP we have available 
The P-USP Tulonal lor $25.00. This 
expertly written lex! is bound in a 
handsome binder and is packaged 
to include a disk, containing all ihe 
sample programs referenced in the 
text al no extra charge 



'::. .-: ■: in COM ■. 
10" Hooting point a 




formerly Pegasys Systems, Inc. 



4005 Chestnut Street— Philadelphia, PA 19104 
Orders Only: 000-523-0725 — Penna. Residents: 215-387-1500 



nla residents add 6% sales tax Apple Is a in 



□ aik ol Apple Compuli 
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Pascal Tutorial 



Part 3 



Victor R. Fricke 

325 Ramapo Valley Road 

Mahwah, New Jersey 07430 



In the previous articles in this series we 
concentrated on the use of the Apple 
Pascal operating system software, more 
than on Pascal itself. This article con- 
centrates on the Pascal language and 
gives examples of why I think it is 
easier to program in Pascal than in 
BASIC. We will discuss disk I/O opera- 
tions, and compare BASIC control 
structures, such as IF and GOSUB, to 
their Pascal equivalents. 

One of the Pascal structured data 
types is the file, a sequence of records. 
The usual analogy is a file cabinet, 
which is a sequential collection of 
folders, each one containing a record. 
In each folder there may be several dif- 
ferent pieces of paper, but they are all 
related to each other in some way. Each 
piece of paper is an element of the 
record, and it can contain several data 
fields. 

For example, a medium-sized busi- 
ness could have its "PERSONNEL" file 
in one cabinet. Each employee is repre- 
sented by a folder containing his 
record. For each record folder, there 
might be a personal data card, a W-4 
form, and a work log. 

Each of these "elements" of the 
record can contain several data fields. 
The personal data card, for example, 
would have name, address, home phone, 
department, date hired, current pay 
rate, etc. 

Just as the accountant docs not have 
enough space on his desk for all this in- 
formation at once, so also the computer 
does not have enough central memory 
for its files. In both cases, the answer is 
to keep the file in external storage, and 
to process one record at a time. Disk 
I/O is the process of selecting one 
record at a time and bringing it into 
central memory from the external 
storage medium for processing. 



Pascal files are sequential. Each 
record is stored in sequence, and 
retrieved in the same sequence. In this 
way, Pascal files are like tape files: a 
new record can only be added at the end 
of the file. 

There is another resemblance to 
tape files. A Pascal file can only be in 
one mode at a time; either it is in a read 
mode, or a write mode — never both at 
the same time. This, of course, is also 
the restriction on BASIC disk files. 



Creating a File 

Following our analogy a little fur- 
ther, suppose our hypothetical accoun- 
tant were establishing the personnel 
file for the first time at a new business. 
Part of his job is to define the internal 
structure of the file; i.e., what data will 
be in each person's file. Each record can 
be as simple or complex as necessary. 
However, each record will have the 
same format. In Pascal, the TYPE 
declaration is used for this purpose. 



Figure 1 








TYPE 








DATE = 








RECORD 








DAY s 


1 ..31 ; 






MONTH : 


PACKED ARRAY 


[1.. 


3] OF CHAR; 


YEAR : 


0. .99 






END; (* DATE *) 








PERS0NALDATA= 








RECORD 








LASTNAME 


PACKED ARRAY 


[1 • 


15] OF CHAR; 


FIRSTNAME 


PACKED ARRAY 


[1 • 


12] OF CHAR; 


EMPL0YEEN0 


INTEGER; 






DEPARTMENT 


INTEGER; 






H0MEPH0NE 


PACKED ARRAY 


[1 • 


. 10] OF CHAR; 


STREETAD 


PACKED ARRAY 


[1 • 


. 12] OF CHAR; 


ZIP 


INTEGER; 






DATEHIRED 


DATE; 






PAYRATE 


REAL 






END; <* PERSONALC 


)ATA *) 






W4 = 








RECORD 








MARRIED 


BOOLEAN; 






DEPENDENTS 


INTEGER; 






EXTRAWH 


REAL 






END; (* W4 * ) 








PERS0N= 








RECORD 








DATA 


: PERSONALDATA, 






W ITHHOLD 


: W4 






REGHOURS 


: ARRAY [1 52] 


OF 


REAL; 


0TH0URS 


: ARRAY [1 . . 52] 


OF 


REAL 


END (* PERSON *) 








VAR 








WORKER : FILE OF P 


ERSON 
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Using our personnel file example, 
the hypothetical accountant might make 
the Pascal declarations in figure 1 . 

This results in a file called WORK- 
ER, composed of a fairly complex struc- 
ture of nested records. The beauty of 
Pascal is that you don't need to worry 
about memory allocation or how the 
data is packed into disk files. Pascal 
takes care of all that automatically. 

There can be many more records in 
a file than can fit into available mem- 
ory. Fortunately, Pascal deals with a 
file one record at a time. The way the 
system deals with an external file is to 
set up something called a "file buffer 
variable." This variable serves as a 
window to peer into the file and ex- 
amine one record at a time. For this 
reason, the file buffer variable is fre- 
quently referred to as a "window 
variable." 

For a file called WORKER, the file 
buffer variable is referred to as 
WORKER A. Each of its components 
can be individually referred to,- for ex- 
ample WORKERS .DATA. LAST- 
NAME, or WORKER A. WITHHOLD. 
MARRIED. 

After the file is defined, it is opened 
for writing by the REWRITE statement. 
We can select the same file name or a 
different one for the disk directory. For 
clarity, we will call it DISKFILE. To 
create the file, we use 

REWRITE(WORKER,'DISKFILE') 

1 like to think of the REWRITE 
statement as analogous to erasing and 
rewinding a tape. It does the following: 

1. Allocates variable storage space in 
memory for the defined data struc- 
ture of the WORKER file. 

2. Sets up the file buffer variable 
WORKER A 

3. Places the file name DISKFILE tem- 
porarily on the disk directory. 

4. Sets the file position pointer to 
(first record in file). 

5. Sets EOF to true (the beginning of 
the file is also the end of the file if 
no records exist yet). 

EOF is a predefined procedure 
which returns a Boolean value of TRUE 
when the file position pointer is at or 
beyond the end of the file, and FALSE 
when it is at a record before the end of 
the file. 



The directory entry for the file is 
only temporary; it will be removed 
from the directory if the program ter- 
minates without executing a 

CLOSE(WORKER.LOCK) 

statement. This statement instructs 
the system to make the temporary 
diskfile permanent. 



Putting Data Into a File 

Once your program has established 
values for the various elements in 
WORKER A , you can write the resul- 
ting record to the file by using 

PUT(WORKER) 

This statement puts the record into 
the file buffer area of memory and then 
advances the file position pointer to the 
start of the next record. Depending on 
size, it may also cause the system to 
write the buffer block onto the disk. It 
doesn't always happen with each PUT, 
because the block size is always 512 
bytes, but the record can be any size. 

Reading From a File 

To extract data from a file, you have 
to open it for reading. The RESET state- 
ment does this. For our example, it 
would be 

RESET(WORKER,'DISKFILE') 

If you think of the tape analogy, this 
statement is like rewinding the tape 
and reading the first record into the 
window variable. If you RESET a file 
that is already open, you will make the 
window variable have the values asso- 
ciated with the first record in the file. 
In a way, this is like 

10 RESTORE 
20 READ 

in BASIC. 

EOF is left with the value of FALSE 
by a RESET. Once the file is RESET, to 
read subsequent records use the GET 
statement. GET(WORKER) reads the 
record at the current file pointer loca- 
tion and then advances the file position 
pointer. 

Updating a File 

In any file that requires sequential 
access as described in this article, it 
would be awkward to update any record 
if the sequential access were strictly 
observed. You would have to read and 
write back all the records before the 



one you wanted to update. It would be 
far more convenient to go directly to 
the record you want, and write its new 
value. 

The SEEK statement allows you to 
do this. Each record has a sequence 
number associated with it (the first 
record is number 0). By doing a SEEK 
and then a PUT, you can update a 
record. 

The SEEK statement looks like this: 

SEEK(WORKER,57) 

This statement advances the file 
position pointer so that it is at the 
beginning of the 58th record (record 
57). The next GET or PUT will then 
operate on the desired record. 



Closing a File 

After you finish reading or writing 
records in the file, one or more records 
may remain in the file buffer. The direc- 
tory entry of the file name is temporary. 

To preserve the data in the file buf- 
fer and to deallocate the file buffer, it is 
necessary to close the file before the 
program terminates. This is done by 
using the 

CLOSE(WORKER.LOCK) 

statement. 

Of course, you may not want to 
save the data that you have placed in 
the disk file. In this case, 

CLOSE(WORKER.PURGE) 

will delete the temporary directory en- 
try created by the REWRITE|WORKER, 
'DISKFILE') statement. Since the direc- 
tory no longer contains the file name 
'DISKFILE', it considers the space 
formerly occupied by the temporary file 
as < UNUSED > . 

IORESULT 

In many applications, it would be a 
good idea to test for errors when a disk 
I/O operation is attempted. The disk 
could be bad, the wrong volume might 
be on line, or the file you want to up- 
date may not yet exist. 

BASIC provides the ON ERR GOTO 
statement so that you can recover from 
an error without an abnormal termina- 
tion of the program operation. Pascal 
provides a similar capability with the 
predefined IORESULT function. 
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[■citing, tmi 9«m interactive language. VIC 

• ffli? to learn «(lh 60* powerful coMunds 

• Double density Graphics, large rwBDer display 

• Lotting, and SAVEIrig of VI6IL program to cassette or diskette 

• Hint complete programs included - Breakout, SpaceWar, AntlAlrcraft, 
Spacaflattle, Concentration, Hue, Kaleidoscope i Fortune! el ler. 

• Coapreftemlve 50* page annual 

• For OiO, ** or 4.0 VMS «(th 8X of mmoty U.S. I CAXttA FOREIGN 

¥KIl for PtT/CBH on cassette or diskette «t/9 program (35 (40 

VICIL for VIC on cassette (requires » mrma<y expander) (35 (40 

VI6IL User's Htiual (refundable with software order) (10 (1? 

VIGIL Interpreter Listing (650? Asseabler Language) 125 (30 



Tiny Pascal 



PET 4 APPLE II USERS 

Structured language alternative to BASIC for P€T or APPLE II Includes: 
' LIHC fDITO" - creates, Modifies and Maintains source language. 
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To use IORESULT, you have to turn 
off the I/O error checking by using the 
compiler directive (*$I-*) first; other- 
wise, the program will terminate before 
you can check the value returned by 
IORESULT. 

IORESULT returns an integer value 
from to 14, as listed in table 2 of 
Appendix B in the Apple Pascal Lan- 
guage Manual. If the value is 0, there is 
no I/O error. For the other codes, you 
may want to define some error recovery 
procedures, and perhaps use a CASE 
statement to invoke them. 



Putting It All Together 

Now that we have covered the 
highlights of Pascal disk I/O, it will be 
instructive to look at an example. List- 
ing 1 creates and updates a simplified 
personnel file. The file structure has 
been simplified from our previous ex- 
amples to keep the program short. 

There are similarities and differ- 
ences between Pascal and BASIC. The 
similarities should make it easy for 
anyone who knows BASIC to learn 
Pascal quickly. The differences are 
what allows you to write better pro- 
grams more quickly in Pascal. 



Variables 

In many versions of BASIC, a 
variable name can only be one letter, or 
a letter and a digit. Applesoft is slightly 
better because you can use a variable 
name of almost any length. Unfor- 
tunately, however, only the first two 
characters count. That is, SUNDOWN, 
SUDS, and SU are all the same variable 
in Applesoft. 

In Pascal, variable names can also 
be quite lengthy, but Pascal variables 
are distinguished by the first eight 
characters. So the examples given in 
the previous paragraph would be dis- 
tinct in Pascal. This allows you to use 
identifiers that have a better mnemonic 
relationship to the quantity repre- 
sented by the variable. 

As an example, it is much easier to 
remember the meanings of INTRATE, 
INTEREST, and INVOICE than of 1, 12, 
and 14. 

In BASIC there are a limited 
number of variable types; integer (A%), 
real (A), and string (A$). These variable 
types are implicitly defined by the suf- 
fix character on the variable name. 



Listing 1 

PROGRAM PERSONNEL (WCRKER) ; 



TYPE 

PERSON= 
RECORD 

LASTNAME 

EMPLOYEENO 

MARRIED 

DEPENDENTS 

PAYRATE 



STRING[15J; 
INTEGER; 
BOOLEAN ; 
INTEGER ; 
REAL 



END; (* PERSON RECORD *) 



VAR 



WORKER 


FILE OF PERSON; 


FILENAME 


STRING; 


NUMBER, 




RUGRATS, 




RECNO 


INTEGER ; 


NAME 


STRING[ 15]; 


STATUS 


BOOLEAN ; 


RATE 


REAL; 



PROCEDURE SHOWENDRECNO ; 
BEGIN 

RECNO :- 0; 
RESET (WORKER) j 
WHILE NOT EOF(WCRKER) DO 
BEGIN 

GET (WORKER); 
RECNO :- RECNO + 1; 
END; (* WHILE *) 
WRITELN( ' EOF IS ' , RECNO) ; 
END; 

PROCEDURE EMPTY; 
BEGIN 

WITH WORKER" DC 
BEGIN 

LASTNAME := ' 
EMPLOYEENO :- 0; 
MARRIED :- FALSE; 
DEPENDENTS :- 0; 
PAYRATE i« 0.0; 
END; 
END; 



PROCEDURE NAMEIT; 
BEGIN 

WRITE ( ' LAST NAME : ' ) 

READLN(NAME); 

WORKER*. LASTNAME :- NAME; 
END; 



PROCEDURE NUMBERIT; 
BEGIN 

WRITE ( 'EMPLOYEE NO. : ' ) ; 

READLN ( NUMBER ) ; 

WORKER". EMPLOYEENO :- NUMBER; 
END; 



PROCEDURE MARRYIT; 
VAR 

ANSWER : CHAR; 

BEGIN 

WRITE( "MARRIED? (Y/N) : ' ) ; 

READ (ANSWER) ; 

WRITELN; 

IF ANSWER » "V THEN STATUS :■ 
ELSE STATUS :> 

WORKER". MARRIED :- STATUS; 
END; 



(* INDICATE LOCATION OF EOF *) 



(* CLEAR RESIDUAL JUNK *) 



';(* 15 BLANKS ») 



TRUE 
FALSE; 
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PROCEDURE DEPENDIT; 
BEGIN 

WRITE( 'NUMBER OF RUGRATS s ' ) ; 

READLN( RUGRATS); 

WORKER" . DEPENDENTS : = RUGRATS ; 
END; 



PROCEDURE PAYIT; 

BEGIN 

WRITE ( 'PAY RATE 
READLN(RATE); 
WORKER" . PAYRATE 

END; 



RATE; 



PROCEDURE FILLOUT; 
BEGIN 

WRITELNt 'RECORD NO i ' , RECNO) ; 

NAMEIT; 

NUMBERIT; 

MARRYIT; 

DEPENDIT; 

PAYIT; 
END; 



:$'); 



(* GET VALUES FOR RECORD ELEMENTS *) 



PROCEDURE APPEND; 
BEGIN 

EMPTY; 

FILLOUT; 

PUT (WORKER) ; 
END; 



PROCEDURE DISPLAY; 
BEGIN 

PAGE (OUTPUT); 
WITH WORKER" DO 
BEGIN 

WRITELN( 
WRITELN( 
WRITE( 



(* STICK A RECORD ON THE END CF FILE •) 



(* SHOW THE CURRENT RECORD *) 



Is LAST NAME 
2; EMPLOYEE NO. 
3sMARITAL STATUS 
CASE MARRIED OF 

FALSEs WRITELN( 'SINGLE' ); 
TRUE : WRITELN( 'MARRIED' ) 
END; (* CASES *) 
WRITELNT 4; # OF DEPENDENTS s 



, LASTNAME) ; 

.EMPLOYEENO); 

)? 



.DEPENDENTS); 



WRITELN( '5sPAY RATE 
END (* WITH *); 
END; (* DISPLAY *) 

PROCEDURE UPDATE; 
VAR 

CHOICE s INTEGER; 

ANSWER s CHAR; 



s S", PAYRATE ) ; 



(* MODIFY A RECORD *) 



SELECT NUMBER OF ITEM TC BE CHANGED. ' ) ; 
SELECT TO OUIT. ' ) ; 



BEGIN 

DISPLAY; 
WRITELNt 
WRITELN( 
RESET (WORKER) ; 
CHOICE ;= 1; 
WHILE CHOICE >0 DO 
BEGIN 

READLN( CHOICE) ; 

IF (CHOICE>0) AND (CHOICE<6) THEN 
CASE CHOICE OF 
Is NAMEIT; 
2: NUMBERIT; 
3; MARRYIT; 
4: DEPENDIT; 
5: PAYIT; 
END; (* CASES *) 
END; (* WHILE *) 
DISPLAY; 

WRITELNT IS EVERYTHING OK? '); 
READ( ANSWER) ; 
WRITELN; 

IF ANSWER <> 'Y' THEN UPDATE 
ELSE 
BEGIN 



(Continued) 



In Pascal, a wide variety of variable 
types are available. Besides INTEGER, 
REAL, and STRING, you have other 
predefined types like CHAR, 
BOOLEAN, and LONG INTEGER. You 
can also define your own data types. As 
a matter of fact, you must declare all 
variables to be of a specific type before 
you use them in a Pascal program. 

The big advantage of Pascal is that 
you are not confined to using just these 
predefined types of data; you can define 
your own data types, and use variables 
which have values of those types. 

There are lots of advantages to 
defining your own data types. For in- 
stance, you could represent the months 
of the year by their ordinal integers; 
e.g., 1 for January, 2 for February, etc. 
In BASIC this is the only way to do it. 
But in Pascal you can define a new data 
type MONTH as follows: 

TYPE 

MONTH = (JAN.FEB.MAR, 
APR,MAY,JUN,JUL,AUG,SEP, 
OCT.NOV.DEC); 

VAR 

BIRTHMONTH : MONTH; 

This method allows you to use an 
assignment statement in your program 
which is straightforward and easy to 
understand: 

BIRTHMONTH := MAY; 

Assignments 

In BASIC, the symbol " = " has an 
ambiguous meaning. It can represent 
the assignment of a value to a variable, 
as in 

50 A = 27 

Or it can represent the Boolean equali- 
ty operator; i.e., 

50 IF A = BTHEN 100 

In the above example, A = B is an 
expression that is either true or false. I 
have called this ambiguous because the 
fragment A = B can be either a logical 
(Boolean) expression, or an assignment 
instruction, depending on context. 
Also, the Boolean value of "false" is 
the same as the real value of in 
BASIC, lending further ambiguity. 

In Pascal this ambiguity is not pres- 
ent. An assignment statement uses the 
"assignment operator," ": = ", as in 
the example 

A:= B; 
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END; 



SEEK ( WORKER, FECN0) 
PUT (WORKER) ; 
END; (* ELSE *) 



PROCEDURE DOIT; 
BEGIN 

PAGE (OUTPUT) ; 

SHOWENDRECNO; 

WRITELN( 'RECORD NO? (-1 TO CUIT) ' ) ; 

READLN(RECNO) ; 

WHILE RECNO >= DO 
BEGIN 

RESET (WORKER) ; 
SEEK (WORKER, RECNO) ; 
GET (WORKER) ; 

IF EOF(WORKEP) THEN APPEND 
ELSE UPDATE; 
WRITE( 'RECORD NO? (-1 TO QUIT)'); 
READLN( RECNO) ; 
END; (* WHILE *) 
END; (* DOIT *) 



(* THIS IS THE PROCEDURE *) 
(* THAT CONTROLS THE OTHERS *) 



PROCEDURE ERRHANDLE; 
VAR 

ANSWER : CHAR; 



(* OPENS FILE IF NEW *) 



BEGIN 

WRITELN('NO SUCH FILE ON DISK.'); 
WRITE ('DO YOU WANT TO ADD IT? '); 
READ (ANSWER) ; 

IF ANSWER = 'V THEN 
BEGIN 

REWRITE(WORKER, FILENAME) ; 
DOIT; 
END; (* IF *) 
END; (* ERRHANDLE *) 



BEGIN (* MAIN PROGRAM *) 
WRITE ( 'FILE? ' ) ; 
REA DLN ( F I LENAM E ) ; 

(*$I-*) 

RESET (WORKER, FILENAME) ; 
(*$I+*) 

IF IORESULT = THEN DOIT 

ELSE ERRHANDLE; 



CLOSE (WORKER, LOCK) 
END. 



while a Boolean expression uses the 
"equality operator," " = ". The BASIC 
statement 

100 IFA=BTHENC = D 

results in only C changing its value. 
This becomes more obvious in the 
equivalent Pascal statement 

IF A = BTHENC:= D; 

IF Statements 

In BASIC the IF statement has the 
format 

10 IF expression THEN state- 
mentl 

20 statement.2 

i ■ 

If expression is true, then statement 
1 is executed; otherwise statement 2 is 
executed. In Pascal, the structure of the 
IF statement is exactly the same. It can 
also be written in this form: 

IF expression THEN statement 1 
ELSE statement2; 

Multiple Blanches 

The situation where your program 
must choose between multiple alter- 
natives provides an interesting com- 
parison between BASIC and Pascal. In 
BASIC, such a branch statement might 
be used to select a subroutine based on 
student grades, for example. You would 
need to use a "computed GOSUB" 
statement: 

10 ON GRADE GOSUB 1000, 
1750, 2235, 8870, 9025 

This type of statement requires 
GRADE to have an integer value of 1 
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page) and complete control of printer (paganation and tab setting). User is free to 
move source, object and symbol table anywhere in memory. Requirements: 48K of 
RAM. and ONE DISK DRIVE. Optional use of 80 column M&R board, or lower case availa- 
ble with Paymar Lower Case Generator. 

TAKE A LOOK AT JUST SOME OF THE EDITING COMMAND FEATURES. Insert at line » n Delete a character 
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through 5, which might correspond to a 
grade of F through A. The difficulty 
here is that you have to do a lot of page- 
flipping to see what each of those sub- 
routines does. 

In the Pascal version of this selec- 
tion statement, there are two signifi- 
cant differences. You can make 
GRADE have values of A, B, C, D, or F 
by defining your own data type: 

TYPE 

SCORE = (A,B,C,D,F); 

VAR 

GRADE : SCORE; 

You can also use meaningful pro- 
cedure names for each of the target pro- 
cedures, instead of the statement num- 
bers which have no meaning. Thus, the 
example of multiple branching in 
Pascal would be: 

CASE GRADE OF 

A: EXEMPTFROMFINAL; 

B: OPTIONALFINAL; 

C: FINALEXAM; 

D: COUNSEL; 

F: FAIL 
END; 

Looping 

Anyone familiar with BASIC knows 
about FOR... NEXT loops. This struc- 
tured command is used to repeat a 
series of instructions a predefined 
number of times. The FOR statement 
sets up an index to count the number of 
iterations, gives the index its initial 
value, does the block of instructions, 
increments the index, and finally 
checks to see if the upper limit of the 
index has been reached. If it has, the 
loop is satisfied, and the instruction 
following the loop is executed. If the 
index has not yet reached its limit, the 
block is executed repeatedly until the 
loop is satisfied. 

Pascal also has a FOR statement, 
which looks like this: 

FOR I := LOW TO HIGH DO 
BEGIN 

FIRSTSTEP; 

SECONDSTEP; 

THIRDSTEP; 
END; 

There are several differences be- 
tween BASIC and Pascal. The STEP 
clause of BASIC is not available; the in- 
dex can only be incremented by 1. You 
cannot count by twos, by fives, or by 
anything else. You can count down, by 
using the reserved word DOWNTO in 
place of TO in the FOR statement, as in 



FOR I := HIGH DOWNTO 
LOW DO 

In BASIC, the parameters in the 
FOR statement may have real or integer 
values. In the Pascal version, they must 
be ordinal, such as INTEGER, integer 
subrange, CHAR, or a user defined 
type, such as the type MONTH referred 
to earlier in this article. 

If you want to perform other types 
of loops in BASIC, you have to get very 
clever with IF statements, indexes, etc. 
For example, suppose you want to loop 
for as long as it takes for a process to 
return a desired result, and you have no 
way of knowing in advance how many 
iterations it takes. An example of this 
type of loop would be the use of the 
Newton-Raphson method of finding the 
roots of an equation. 

To do this, you need to start with an 
approximate answer, calculate a new 
approximate answer, and compare the 
two results to see how close they are to 
being the same. This process is re- 
peated until the difference between the 
two successive answers is acceptably 
small. 

Doing this in BASIC is awkward. In 
Pascal, it is quite easy. It is done using 
the REPEAT loop: 

REPEAT 

STEP1; 

STEP2; 

STEP3; 

STEP4 
UNTIL DIFFERENCE < = 

DELTA; 

Of course, you must be sure that 
somewhere in the body of this loop 
DIFFERENCE, it is affected in such a 
way that it will eventually satisfy the 
condition in the UNTIL statement. 
Otherwise, you will have an infinite 
loop, just as easily as you can in BASIC. 

An additional Pascal looping struc- 
ture not available in BASIC is the 
WHILE loop: 

WHILE DIFFERENCE > = 
DELTA DO 

BEGIN 

STEP1 ; 

STEP2; 

STEP3; 

STEP4 
END; 

The difference between the 
REPEAT... UNTIL structure and the 
WHILE... DO structure is that in the 
former, the condition for satisfying the 



loop is evaluated after the loop is 
executed, while in the latter case the 
condition is evaluated before executing 
the loop. 



Functions and Procedures 

In Pascal terminology a set of in- 
structions that is self-contained and 
constitutes a subprogram is called a 
procedure. In BASIC it is called a 
subroutine. The BASIC subroutine is 
called into operation by "GOSUB line 
number." The Pascal procedure is ac- 
tivated by using its name in the main 
program. As discussed before, this 
tends to make Pascal programs easier to 
understand. 

Another difference between these 
languages is parameter passing. In 
Pascal the values of the variables 
modified by the procedure are carefully 
controlled by the use of local variables 
and formal parameters. In a BASIC pro- 
gram all variables are global; that is, all 
parts of the program have equal access 
to each variable. This can result in 
some hard-to-find bugs when a variable 
is changed in a remote part of the pro- 
gram while you are expecting it to have 
a different value. 

By keeping all variables as local as 
possible in Pascal, and passing the 
values through formal parameters, this 
problem is eliminated. For a thorough 
discussion of this area, see reference 1 
in the bibliography at the end of this 
article. 

Functions are similar in both lan- 
guages. In BASIC a function is defined 
in a DEFFN statement. It, too, has a 
formal parameter (referred to as its 
argument in BASIC) like it does in 
Pascal. In Pascal a function is defined 
in a FUNCTION subprogram. 



Summary 

In this series of articles I have given 
a general overview of the Apple Pascal 
system, with emphasis on the oper- 
ating system. The more I got into the 
Pascal language, the more 1 was con- 
vinced that Pascal has many advan- 
tages over BASIC for most applications 
except for very short programs. 

One of my motives for writing this 
series was the lack of good references 
for learning Pascal on your own. I 
wanted to share some of my hard-won 
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knowledge with others and save them 
the trouble I had digging up all this 
information. 



In the time since this series was 
started, several more references have 
become available. The following bib- 
liography should prove useful to 
anyone seriously interested in learning 
Pascal. 
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Command-O. return it to us within ten days lor an immediate, full refund. 

Cnmmand-O from Skyles Kleelrie Works S75.00 

Complete with Socket -2-Mc 95.00 

Shipping and Handling (USA /Canada) S2.50 (Europe/Asia) $10.00 

California residents must add 6%/6'/:"k sales lax, as required. 

SkyleS Electric Works Visa/Mastercard orders: call tollfree 

flf 23 IK South Whisman Road (800) 227-9998 (except California). 

Mountain View, California 94041 California orders: please call (415) 

(415) 965-1735 965-1735. 
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MICRO - The 6502/6809 Journal 



No. 44 -January 1982 



OSI COMPATIBLE HARDWARE 

IOCA10X SERIAL PORT *1» 

ACIA based RS-232 serial printer port. DIP SWITCH selectable baud rates of 300-9600. 
Handshaking (CTS) input line is provided to signal the computer when the printer butter 
is lull. Compatible with OS«U V1 2 and OS65D . 

IO-CA9 PARALLEL PORT *175 

Centronics Standard Parallel printer interlace lor OSI computers. The card comes com- 
plete with 10 It. ol flat ribbon cable. Compatible with OS-65D and OS6SU software. 
IO-CA8D DIABLO PARALLEL PORT $175 

DIABL0 12 BITWORD Parallel port for use with word processor type printers. Complete 
with 10 ft. cable.' Compatible with OS«5U software. 

IO-LEVEL3MULTVUSEREXPANSION *450 

Provides 3 printer interfaces currently supported by OSISerlal. Centronics Parallel, 
Diablo Parallel. 4K ol memory at D000 for Muiti-user executive. 4 Port serial cluster. The 
LEVEL 3 card allows expansion of an OSI C3 machine up to 4 users with appropriate ad- 
ditional memory partitions. 

2*MEM-CM»...*3i0 1SMEMCM9...W00 » MEM-CM9 *210 

24K memory card is available at 3 different populated levels. All cards are fully socketed 
lor 24K of memory. The card uses 21 14-300ns chips. DIP SWITCH addressing Is provided 
in the lorm ol one 16K block and one 8K block. Also supports DIP SWITCH memory parti- 
tion addressing lor<jse In multi-user systems. 

FL470 FLOPPY D«K CONTROLLER «U0 

OSI-Type floppy disk controller and real time clock. Will Support 5% " orB", Single or 
double-sided drives. Requires drives with separated data and dock outputs. 
BrO-ISOOBAREIOCARD **> 

Super 1/OCard. SupportsSK ol 21 14 memory In two DIPSWITCH addressable4K blocks. 
2 16 Bit Parallel Ports may be used as printer interfaces. 5 RS-232 Serial Ports with CTS I 
RTS handshaking. With manual and Molex connectors. 

BHEM-CK9BARE MEMORY CARD MB 

Bare 24K memory card, also supports OSItype real time clock and floppy disk controller. 
With manual and Molex connectors. 

•96 PROTOTYPE CARD ,«5 

Prototype board holds 96 14 or 16 pin IC's. Will also accommodate 18, 24, or 40 pin IC s. 
Row and column zone markings, easy layout. y„" epoxy glass PC. board. 
C1P-EXP EXPANSION INTERFACE »« 

Expansion lor CI P600 or 610 boards to the OSI 48 Pin Buss. Uses expansion socket and 
interlace circuitry to expand to 48 Pin Backplane. Requires one slot in backplane. 
BP-5M BACKPLANE U7 

Assembled 8-slot backplane with male Molex connectors and termination resistors. 
DSK-SW DISK SWITCH *» 

A circuit when added to OSI Minifloppy systems extends the life of drives and media Ac- 
complish this by shutting off Minifloppy Spindle motor when system is not accessing 
the drive. Complete KIT and manual. 

PW-54 POWER SUPPLY «S 

Power One brand supply 5V - 6 amps with overvoltage protection. Reg. $49.95. 



D&N MICRO 

INC. 

3684 N. Wells Street Ft. Wayne, Indiana 46808 
219/485-6414 

TERMS: Check or money order Add $2 Shipping i Outside U.S. add 10% 



ED-SCI STATISTICS 

FOR THE PROFESSIONAL A COMPLETE STATISTICS 
AND DATA MANAGEMENT PACKAGE 



Data Entry and Filing 

• By Variable Name and 
Case Number 

•One-Time Data Entry 

• Easy and Rapid Editing 

• Data Entry Worksheets 

Data File Manipulation 

• Add New Variables 

•Add or Delete Case Values 

• Create SUBFILES By User 
Defined SEARCH & 
SELECT Criteria 

• Merge Files 



Statistical Calculations 

>Mean, Std. Dev., Std. Error 
•Coefficient of Variation 

• Frequency Distribution 

• Unpaired t-Test 

• Paired t-Test 

• Mann-Whitney U Test 
•Wilcoxon Paired Sample Test 
•Chi-Square Test 

• Linear Regression 
•Correlation 
•One-Way ANOVA with the 

Newman-Keuls Test 

• Hard Copy of Data & Results 



Statistical Calculations can be made on VISICALC* (DIF) 
and DATAOEX* FILES. Graphic Plotting of all ED-SCI 
STATISTICS Data Files can be done with APPLE PLOT.* 

Only $95.00 brings you the ED-SCI STATISTICS instruction 
manual, the Master Program Disk, and a Back-Up Disk. 
See ED-SCI STATISTICS at your local Apple Computer store. 
Dealer inquiries invited. For information please phone or write: 

Ed-Sci Development 

460 Beacon St. San Francisco, CA 94131 (415) 282-7020 

ED-SCI STATISTICS requires an Apple II with the Applesoft or 
Language Card, or an Apple II+, 48K memory, and at least one 
disk drive with DOS 3.3 (16 sector). 
•Apple is a registered trademark of Apple Computer Inc. 
VisCalc is a registered trademark of Personal Software Inc 
DATADEX Is a registered trademark of Sonoma Softworks. 



M®d§iSAShM 



Then 



e y s no 



Dr.Jekyll 

in Apple IT 

programming. 



hp 



Programming 6502 Assembly Language is no 
longer frightening or a monster problem. Because 
Randy Hyde has written the book that's easy to 
understand, easy to follow. It turns assemblyo 
language into the 'friendly language'. For anyone. 
For the average Apple n owner and the newest 
beginner. 

Let Mr. Hyde get you started immediately, with 
string and math operations. See how to convert 
BASIC programs so they run up to 100 times 
faster! Discover Sweet-16, the 'hidden' 16-bit 
pseudo computer inside your Apple. Enjoy using 
your Apple to the maximum by following the step- 
$.•. by-step, practical examples. . .which turn you into 
£ a programmer in the blink of a chapter. 

j thanks to Mr. Hyde 

MfMWLY^y $19.95 per easy-reading copy at computer 
IA i?P stores everywhere, or from: 

DATAMOST 

: - 19273 Kenya St. 

_ „ Northridge, CA 91326 

(213) 366-7160 



ASSEMBLY ■? 
iAM/=n A GE 



•Apple II is a trademark ol Apple Computer. Inc. 



VISAIMASTERCHARGE accepted. 
St. 00 shippingfhandling charge. 
ICalilornia residents add 6% tax) 



No. 44 -January 1982 



MICRO - The 6502/6809 Journal 



93 



Bill Budge, creator of 
"Raster Blaster," needs it: 

"... I'll never write another 
program without BugByter!" 




FEATURES 


Who else needs BugByter? 


INCLUDE: 


. . .Apple* users who want to learn machine language. 


•All registers displayed 

•Compatible with all 
Apple languages 

•Completely relocatable 


. . . Apple programmers in need of a complete 6502 
debugging tool. 

. . . Educators who need to demonstrate the operation 
of the Apple's central processor. 


•Full hex and ASCII I/O 

•Multiple options while 
in trace mode 


. . . Software professionals who need to display and 
control all 6502 registers. 


•Literal and transparent 
breakpoints 

•Resident assembler 

•Resident disassembler 


BugByter 


•User-definable screen 

•Ram screen dump in 
hex and ASCII 

•Comprehensive 
documentation 

•Single keystroke 
operation 

•Instruction cycle 
counter 


is 
NOW AVAILABLE AT $39.95 

on diskette for Apple II or Apple II + 

from 

COMPUTER-ADVANCED IDEAS, INC. 

1442A Walnut Street, Suite 341 

Berkeley, CA 94709 

(415) 526-9100 


•Hexadecimal/ 
decimal 
conversions 


• 


•Can run in add-on 
ram card 






'Apple is a registered trademark ot Apple Computer. Inc. 
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RELOC 



RELOC allows the Apple Pascal 
text editor to be used with DOS 
3.3 to more easily edit BASIC 
text files. 



Robert Walker 

61 OOF Wood Chase Lane 

Marietta, Georgia 30067 



With the recent purchase of Apple 
Pascal, one shortcoming of Applesoft 
and Integer BASIC has become evident. 
Unlike Pascal, BASIC is not supported 
by a powerful text editor. This article 
describes how to use the Pascal editor to 
develop BASIC programs. 

With the following program (here- 
after known as RELOC) BASIC pro- 
grams, written with the Pascal editor, 
are relocated from a Language System 
text file to a DOS 3.3 exec file. This file 
is then executed, thus loading the BASIC 
program into memory for running. 

Using the editor for developing 
BASIC programs offers many advan- 
tages. (See listing 1.) Variable names 
throughout an entire program, for in- 
stance, may be changed in seconds. Like 
Pascal, indentation may be used to illus- 
trate FOR-loop nesting. The feature I 
find most convenient is the ability to 
effectively document a program. All text 
enclosed in brackets is ignored by 
RELOC and not sent to the exec file, 
thus eliminating the need for REM 
statements in the final program. This 
means the final program requires less 
memory and executes faster. 

Another important feature of RELOC 
is that all programs are initially re- 
located into an exec file. This is a handy 
means of storing often-used subroutines. 
We may have, for example, a subroutine 
(saved as an exec file) called "PLOT," 
which plots data from an array. After 
completing the main program (with it 
still in memory) simply "EXEC PLOT" 
to insert the subroutine into the main 



program. Provided there is correct in- 
teraction of variables, and no overlap- 
ping of line numbers, everything should 
work fine. 



Program Implementation 



The ability to read Language System 
disks while operating in DOS 3.3 is 
made possible by the fact that both 
systems utilize identical methods to 
physically format disks. Like DOS 3.3, 
Language System disks have 35 tracks, 
numbered through 34. Each track is 
divided into 16 sectors, numbered 
through 15. Furthermore, each sector 
contains 256 bytes. By using the RWTS 
(read or write a track or sector; see 
pp. 94-98, The DOS Manual] sub- 
routine, data on a disk can be accessed 
by simply specifying its location in 
track-sector pairs. 

Finding the location of our Language 
System text file is easy. The Filer com- 
mand "EjXTENDED LIST" supplies the 
starting block address and the number of 
blocks occupied by the text file. Equally 



convenient is the fact that Language 
System files are stored in consecutive 
blocks. If a file starts at block 235 and 
occupies three blocks, then the file 
resides in blocks 235, 236, and 237. 
Simple! Now for the real problem. 

How are these blocks associated 
with track-sector pairs? First, a block is 
actually two sectors (512 bytes). Each 
block number represents two track- 
sector pairs. Second, with some ex- 
perimenting, I've found that each track 
contains exactly 8 blocks (i.e., no blocks 
are split between tracks; see table 1). 
Blocks through 7 occupy track 0. 
Blocks 8 through 15 occupy track 1, and 
SO on. Finally, blocks 272 and 279 oc- 
cupy track 34. In short, the track 
associated with any block can be com- 
puted by the following formula: 

TRACK NUMBER = INTfBLOCK 
NUMBER/ 8) 

Next, we must determine the two 
sectors associated with each block. 
Because these sectors follow no logical 



Listing 1 



t PASCAL-BASIC TEXT FILE TRANSFER 1 
I WRITTEN BY R. WALKER J 

t WICHITA, KS I 

t INITIALIZE VARIABLES 1 

10 HIMEI1:4095 t PROTECT DISK I/O BUFFER 1 

20 DIM L7.<7>,H7.<7> 

30 D*=CHR*<4) £ CTRL-D 1 

32 NL7.=0 t NULL ASCII 3 

34 DL7.-I6 I OLE ASCII J 

36 LB7.=91 I LEFT BRACKET ASCII 1 

39 RB7.=93 C RIGHT BRACKET ASCII I 

40 K=7. 99999 t NUMBER BLOCK PER TRACK 

SLIGHTLY LESS THAN 8 TO PREVENT ROUNDOFF ERRORS I 

C POKE RWTS CONTROL STATEMENTS 

CONTROLLING SUBROUTINE: 768W76 

I/O CONTROL BLOCK: 777-793 

DEVICE CHARACTERISTIC TABLE: 794-797 3 

50 FOR I = 768 TO 797: READ C7.: POKE I.CX: NEXT 

I LOAD SECTOR-BLOCK ASSOCIATION TABLE 1 

60 FOR I - O TO 7: READ L7. 1 I > ,H7. < I > : NEXT 



r INTRODUCTION 1 

70 HOME: VTABC3) 

80 PRINT " PASCAL BASIC TEXT FILE TRANSFER" 

90 PRINT:PRINT 

IIO INPUT "SOURCE DRIVE • (PASCAL)-- ";SD7- 

120 INPUT "OBJECT DRIVE « IBOS'C! \ U»V. 



(Continued) 
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Table 1: 


Block-Track-Sector 




Association Table 










First 


Second 


Block 


Track 


Sector 


Sector 











14 


1 





13 


12 


2 





11 


10 


3 





9 


8 


4 





7 


6 


5 





5 


4 


6 





3 


2 


7 





1 


15 


8 







14 


9 




13 


12 


10 




11 


10 


11 




9 


8 


12 




7 


6 


13 




5 


4 


14 




3 


2 


15 




1 


15 


272 


34 





14 


273 


34 


13 


12 


274 


34 


11 


10 


275 


34 


9 


8 


276 


34 


7 


6 


277 


34 


5 


4 


278 


34 


3 


2 


279 


34 


1 


15 



order, this proves to be more difficult. 
Table 1 shows that within each track, 
these sector locations repeat them- 
selves. For example, the first block of 
any track consists of sector 0, followed 
by sector 14. This sequence is stored in 
DATA statements and later read into 
arrays L% and H%. Locating sector 
numbers would procede as follows. 

Let's assume that some arbitrary 
block X is the Nth block (numbered 
through 7, where N = TRACK 
NUMBER MOD 8) of some arbitrary 
track. The value L%(N) would be equal 
to the low (first) sector of block X. 
Likewise, H%(N) would be equal to the 
high (second) sector of block X. We 
now have an algorithm for determining 
the two track-sector pairs associated 
with each block number. 

As mentioned earlier, the RWTS 
subroutine is used to read the Language 
System text file. During program in- 
itialization, the RWTS controlling 
subroutine is stored in locations 
768-776. Then, the RWTS IOB (I/O 
control block) is stored in locations 
777-793. And finally, the RWTS device 
characteristic table is stored in loca- 
tions 794-797. 

During execution of RELOC, five 
important locations in the IOB are set. 
First, location 779 contains the drive 



Listing 1 (Continued) 



130 PRINT:PRINT 

140 INPUT "STARTING BLOCK — ";SBX 

ISO INFUT "NUMBER BLOCKS ":NB7. 

160 F'RINT:F'RINT 

170 INPUT "EXEC FILE NAME-- ";F* 

180 PRINT:PRINT 

[ LOAD DATA BUFFER WITH PASCAL TEXT FILE 3 

190 PRINT "INSERT PASCAL DISt IN DRIVE H";SD7. 

200 INPUT "THEN HIT RETURN. .."; A* 

210 HOME: PRINT "READING PASCAL TEXT FILE..." 

220 PG7.= 15 I PAGE COUNTER: PG7.1256 = BEGIN LOC. OF DATA I/O BUFFER 1 

222 POKE 779. SDX r DISK DRIVF NUMBER 3 

224 POKE 789,1 I COMMAND CODE: READ I 

230 FOR BL IBLOCK NUMBER! = SB7.+2 t SKIP 1ST 2 BLOCKS 1 TO SBX*NBX-1 

240 TR7. • 1NT<BL/K> I COMPUTE TRACK 3 

250 BIX - INTMBL/K-INTIBL/K) >«8> [ RELATIVE BLOCK NUMBER: 

BI7. = BL MOD 8 1 
255 PG7.-F GX* 1 

I READ FIRST SECTOR OF BLOC* 3 

POKE 781, TRX C STORE TRACK NUMBER IN IOB 3 

POKE 7B2,LV.<BI7.> t STORE SECTOR NUMBER IN IOB 3 

POKE 786, PG7. 

CALL 768 I CALL RWTS SUBROUTINE 3 



260 
270 
280 
290 



330 
340 
350 
360 



I READ SECOND SECTOR OF BLOCK 3 

P6X-P8X* I 

POKE 782,HX<B1X> 
POKE 786, PG7. 
CALL 768 



370 NEXT 
I CREATE DOS EXEC FILE 3 



390 
400 
410 
420 
430 
440 
442 
444 
450 
460 
470 
480 
510 
520 
525 
530 
540 
550 
560 
999 



PRINT: 
INPUT 
HOME: 
PRINT 
PRINT 
FL7.=0 
FOR X 
IF 
IF 



IF 

IF 
PR I 
NEXT 
PRINT 
PRINT 
PRINT 
INPUT 
IF LEF 
END 



PRINT "INSERT BASIC DISK IN DRIVE «" : 0D7. 
"THEN HIT RETURN. .. ";A* 

PRINT "CREATING DOS EXEC FILE..." 
D*; "OPEN";F»; ",D";0D7. 
Dt; "WR1TE";F* 

I REMARKS FLAG 3 
= 4098 I FIRST TEXT CHAR 3 TO 4095* (NB7.-2) *512 I LAST CHAR 
PEEK(X>-DL7. GOTO S20 C SKIP DLE 1 

PEEK(X-I)=DL7. GOTO 520 t SKIP INDENTATION CODE I 
PEEKIX1-LBX I L. BRACKET 3 THEN FL7.- 1 : GOTO 520 
PEEKCX)=RBX I R. BRACKET 1 THEN FL7.=0: GOTO 520 
FLX=1 GOTO 520 C IGNORE TEXT 3 
PEEKIXI-NLX GOTO 520 I SKIP NULL J 
NT CHR*(PEEK<X> >; t SEND CHAR TO EXEC FILE 3 

I MAKE SURE ALL CHARS SENT 3 
D*; "CLOSE";F» 
"FII.F TRANSFERED" 
"ANOTHER <V/N)";A* 
T*<A*,I)="Y" GOTO 70 



IGNORE TEXT 
SAVE TEXT 1 



I RWTS CONTROLLING SUBROUTINE CODE 3 
1000 DATA 169,3,160,9,32,217,3,96,0 

( RWTS I/O CONTROL BLOCK 3 

1100 DATA 1,96,1,0,0 CTRK3,0 CSEC3, 26, 3,0, 16,0, 0, 1 IREAD3, O, 254,96, I 

t RWTS DEVICE CHARACTERISTIC TABLE 3 

1200 DATA 0,1,239,216 
I SECTOR-BLOCK ASSOCIATION TABLE 3 



c 


SECTORS 


RELATIVE 


c 


LOW 


HIGH 


BLOCK 


NUMBER 


1300 DATA 





14 


C 





1 


1310 DATA 


13 


12 


1 


1 


3 


1320 DATA 


11 


10 


C 


? 


1 


1330 DATA 


«? 


8 


c 


3 


3 


1340 DATA 


7 


6 


c 


4 


] 


1350 DATA 


5 


4 


c 


5 


] 


1360 DATA 


3 


2 


[ 


6 


3 


1370 DATA 


1 


15 


[ 


7 


3 



number from which the Language 
System text file is read. Secondly, loca- 
tions 781 and 782 contain the track and 
sector number, respectively. Location 
786 contains the high-order byte of the 
data buffer starting address. The low- 
order byte is set to zero. Note that 
RELOC uses memory locations 4096 
(page 16 of memory) and higher for the 
data buffer. The most important loca- 
tion in the IOB is 789. This contains 
the command code, which tells the 
RWTS subroutine whether to read or 



write. It is important to make sure that 
this code is 1; otherwise, the Language 
System text file may be destroyed! 

The format of Language System text 
files is straightforward (see pp. 185, 
Apple Pascal Reference Manual). Each 
text file begins with a two-block header 
page containing information used by 
the text editor. As a result, these first 
two blocks are not read by RELOC. Our 
text actually begins in the third block. 
Each line of text is preceded by a DLE 
(Data Link Escape), followed by a one- 
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byte indentation code. These two bytes 
are ignored by RELOC. Each line is 
then terminated with a carriage return. 
The end of the text is padded out with 
null characters. 



With the text file in memory, the 
only thing left is to create the DOS 3.3 
exec file. First, RELOC opens the exec 
file with the name assigned by the user. 
Next, each character, with the excep- 



Listing 2 



10 HIMEM: 4095 

20 DIM L7.(7),H7.(7> 

30 D* = CHR* <4> 

32 NL5S - O 

34 DL7. = 16 

36 LB7. = 91 

38 RB7. = 93 

40 K = 7.99999 

FOR I = 768 TO 797: READ C7.: POKE I,C7.: NEXT 
= TO 7: READ L7. < I ) , HX ( I ) : NEXT 
VTAB (3) 

PASCAL-BASIC TEXT FILE TRANSFER" 
: PRINT 
"SOURCE DRIVE * (PASCAL) — " ; SD7. 

"OBJECT DRIVE # (BASIC) " ; 0D7. 

: PRINT 

"STARTING BLOCK — " ; SB7. 

"NUMBER BLOCKS " ; NB7. 

: PRINT 

"EXEC FILE NAME — " ; F* 

: PRINT 

"INSERT PASCAL DISK IN DRIVE #";SD7. 

"THEN HIT RETURN " ; A* 

PRINT "READING PASCAL TEXT FILE " 



50 
60 
70 

80 
90 

110 
120 
130 
140 
150 
160 
170 
180 
190 
2O0 
210 
220 
222 
224 
230 



FOR I 
HOME : 
PRINT 
PRINT 

INPUT 

INPUT 

PRINT 

INPUT 

INPUT 

PRINT 

INPUT 

PRINT 

PRINT 

INPUT 

HOME 
PG7. = 15 

POKE 779, SD7. 

POKE 789, 1 

FOR BL = SB7. 



NB7. - 1 



INT 
INT 



2 TO SB% + 

(BL / K) 

((BL / K - INT (BL / K) ) * 8) 
255 PG7. = PG7. + 1 
260 POKE 781.TR7. 

POKE 782, L7. (BI7.) 
POKE 786, PG7. 
CALL 768 
330 PG7. = PG7. + 1 
340 POKE 782, H7. (BI7.) 
POKE 786, PG7. 
CALL 768 
NEXT 
PRINT : FRINT "INSERT BASIC DISK IN DRIVE tt";0D7. 

INPUT "THEN HIT RETURN " ; A* 

HOME : PRINT "CREATING DOS EXEC FILE..." 
PRINT D*; "OPEN";F*; ",D";0D7. 
PRINT D*; "WRITE";F* 
430 FL7. = O 

440 FOR X = 4098 TO 4095 + (NB7. 
PEEK (X) = DL7. GOTO 520 

(X - 1) = DL7. GOTO 520 
(X) = LB7. THEN FL7. = 1: 
(X) = RB7. THEN FL7. = 0: 
1 GOTO 520 
(X) = NL7. GOTO 520 



240 TR7. = 
250 BI7. = 



270 
280 
290 



350 
360 
370 
380 
390 
400 
410 
420 



442 

444 

450 

460 

470 

4B0 

510 

520 

525 

530 

540 

550 

560 

999 

1000 

1100 

1200 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 



IF 
IF 

IF 
IF 



PEEK 
PEEK 
PEEK 
IF FL7. = 
IF PEEK 



- 2) * 512 



GOTO 520 
GOTO 520 



CHRS ( PEEK ( X ) ) ; 



PRINT 

NEXT 

PRINT 

PRINT D*; "CLOSE" ; F* 

PRINT "FILE TRANSFERED" 

INPUT "ANOTHER (Y/N)";A* 

IF LEFT* (A*,l> = "Y" GOTO 70 

END 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 



169,3,160,9,32,217,3,96,0 

1,96,1,0,0 ,0 ,26,3,0,16,0,0,1 ,0,254,96,1 

O, 1,239,216 



O 

13 
11 

9 

7 
5 
3 

1 



14 
12 
10 

8 

6 
4 

2 
15 



tion of control characters and bracketed 
comments, is sent to the exec file. 
Finally, the exec file is closed. 

Program Operation 

Writing a BASIC program using the 
text editor requires two special con- 
siderations. First, no BASIC line state- 
ment, including the carriage return, 
may exceed 80 characters. This limita- 
tion is due to the 80-column format of 
the editor. I haven't found this to be a 
significant handicap. Second, by enclos- 
ing in brackets, comments can be placed 
anywhere in the program text. This 
means that no print statements, for in- 
stance, may contain brackets. Natural- 
ly, it would still be possible to print 
brackets by using the CHR$ statement. 

Once the text is written and saved, 
enter the Filer and execute the 
"E|XTENDED LIST" command. Note 
the beginning block and the number of 
blocks occupied by the text file. These 
will be needed later by RELOC, but the 
Language System is no longer needed. 
Boot DOS 3.3, and run RELOC. 

The first item requested by RELOC 
is the source drive number. This is the 
drive from which the Language System 
text file will be read. Likewise, the 
object drive number will be requested. 
This is the drive to which the exec file 
will be written. When requested, enter 
the starting block number given by the 
"E)XTENDED LIST" command. 
RELOC automatically skips the first 
two blocks. Therefore, it is unnecessary 
for the user to add two to the starting 
block number. The last request made by 
RELOC is the exec file's name. Any 
legal DOS 3.3 file name will do. 

RELOC will then prompt the user to 
insert the Pascal disk. Once this is read, 
RELOC will prompt the user to insert 
the BASIC disk. The exec file will then 
be written. 

In order to run the BASIC program 
now in exec file, it is first necessary 
to clear any program in the memory 
with "NEW." Incidentally, "NEW" 
(and any other command) may be in- 
cluded in the basic text file, thus mak- 
ing this first step unnecessary. Now load 
the program with the "EXEC" com- 
mand. The BASIC program is now load- 
ed and ready to be run. 

The utility of RELOC extends 
beyond editing BASIC programs. With 
slight modification for example, it 
would be possible to transfer data gener- 
ated in a FORTRAN or Pascal program 
to a BASIC program. This would be very 
handy to anyone desiring Applesoft, 
Integer BASIC, Pascal, and FORTRAN 
to have access to some large data base. 

JUCftO 
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tative forum for the 
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design and applications 
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design and application. 
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membership in the 
Computer Society. 
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12. Other consumer electronics 

13. Industrial controls, systems, and equip. 

14. Components and subassemblies 



15. Materials and hardware 

16. Aircraft, missiles, space and ground 
support equipment 

17. Oceanography and support equipment 

18. Medical electronics 

19. Industrial companies within OEM 
incorporating electronics equip. In their 
end product, not elsewhere classified 

20. Independent research, test, and design 
laboratory and consultant (only if you 
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21. Government agency and military 

22. Industrial companies using and/or 
incorporating any electronic products 
in their manufacturing, research, or 
development activities 
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25. Computer and data processing 
services: service bureaus, software 
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26. All other commercial users 

27. Power generation equip, manufacturer 

28. Power production (atomic, elec, etc.) 

29. Power generation 

30. Power transmission 

31. Power distribution 

32. Utilities, except power (telephone, 
telegraph, pipelines, etc.) 

33. Distributor 

34. School, university, or library 

35. Others (explain) 

JOB FUNCTIONS (Enter code) 



1 . General and corporate management 

2. Design and development engineering 
(circuits, components, equip, systems) 

3. Engineering services evaluation (quality 
control, reliability standards, tests) 

4. Member of Technical Staff (MTS) 

5. Basic research 

6. Manufacturing and production 



7. Engineering support (draftsman, lab 
assistant, technician) 

8. Purchasing and procurement 

9. Marketing, Including sales 

10. Computer systems/operation 

11. Engineering systems planning and 
design (utilities) 

12. Operations Including construction and 
maintenance (utilities) 

13. Consulting 

14. Other "EEV 

15. Other engineers (explain ) 

16. Dean, professor, instructor, etc. 

17. Student 

18. Other personnel (explain ) 



JOB CATEGORY (Enter code) 

1. Management other than engineering 

2. Engineering management 

3. Engineering 



Apple PascaI 

TextFUe Lister 



Outputting Language System 
textfiles to your printer using the 
transfer command is handy, yet 
it produces an awkward and 
untidy listing with no page 
breaks. This program solves that 
problem, producing neatly paged 
output with titles and numbers 
on each page. 



Robert Walker 

61 OOF Wood Chase Lane 

Marietta, Georgia 30067 



Apple Pascal users are familiar with 
using the Filer option "Transfer" for 
printing Language System textfiles. For 
those desiring program listings with a 
professional appearance, this method is 
inadequate. First, each page has no top 
and hottom margins. In fact, it's com- 
mon for a line of text to be printed on 
the perforation between two pages. Sec- 
ond, each page lacks a title and page 
number, making identification and 
ordering difficult or impossible if pages 
become separated. With this in mind, I 
proceeded to write a short Apple Pascal 
utility program which included the 
above mentioned features. 

The program employs the following 
simple algorithm: 

Repeat until end of text. 
Stan at top of page. 
Print page heading (page number 
and optional title). 
Scroll past top margin. 
Print text until reaching bottom 
margin. 

Although the program is simple and 
relatively easy to decipher, some ex- 
planation is needed. 



In the program listing, the constant 
declaration section contains the most 
significant items. The constants Top- 
margin, Bottommargin, and Pagelength 
represent the number of lines each of 
these listing parameters occupies. For 
example, with the values assigned in the 
listing, 59 lines per page will be avail- 
able for the textfile (Pagelength-Top- 
margin-Bottommargin = 66 - 3 - 4 = 59) . 

The page heading is within the 
space occupied by the top margin. 
Specifically, the first line of Topmargin 
(i.e., the page) will always be blank, 
followed by the second line which has 
the page title and number. As a result, 
the minimum value for Topmargin is 
two (lines). 



For this program to work, your 
printer must have at least 80 columns, 
and must be able to vertically tab to the 
top of a new page when sent a formfeed 
control character. 



To use the program simply cXecute 
LISTER (or whatever name you prefer). 
When the textfile name is requested, 
respond with any valid file name. If you 
respond with an asterisk, it will be in- 
terpreted as "SYSTEM. WRK.TEXT". 
A return as a response will end the pro- 
gram. Next, the page title will be re- 
quested. Once this is entered, the text- 
file will be listed, producing documen- 
tation with a professional appearance. 



(* APPLE PASCAL TEXTFILE LISTER t) 
(t Written by Robert Walker t) 
(I Wichita, KS t) 



PROGRAM LISTER; 



CONST Topiargin = 4; (t liniiui of 2 t) 
BottoMargin = 3; 
Pagelength = 66; 

VAR Textfile: Text; 

Textline, Filenaie, Pagetitle: String; 
Linenui, Pagenua, Ioerror: Integer; 
Printer: Interactive; 



(t Determine if linenin is the last line before the bottoa largin. I) 
FUNCTION END0FPA6E: Boolean; 
Begin 
If Linenui=(Pagelength-Botto«argin) 
then Endofpage:=True 
else Endofpage:=False 
End; (t Endofpage t) 



(t Start a new page— Fonfeed, Print heading, and Space up to first line, t) 
PROCEDURE STARTNEWPAGE; 
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PROCEDURE SPACEUP (Lines: Integer); (t send linefeeds to printer ») 

VAR I: Integer; 

Begin 

For I:= 1 to Lines do Hriteln (Printer) 
End; <* SPACEUP t) 
Begin it STARTNEMPA6E t) 

If PagenunOl then PagelPrinter); (I assuie listing begins on new page t) 

Spaceup(l); 

Hriteln(Printer,":(80-Length(Pagetitle)-13) Div 2,Pagetitle, 
' Page no. ',Pagenui); (t print page heading t) 

Spaceup(Topiargin-2); 

Linenui:= Topiargin+1; 

Pagenu§:= Pagenui+1 
End; (I STARTNENPABE t) 

Begin (t MAIN PROGRAM t) 
Reset(Printer, 'Printer:'); 
Hriteln(Chr(12), 'APPLE PASCAL TEXTFILE LISTER'); 
Repeat 
Hriteln; 

HriteCTextfile Naie Ct^SYSTEH.HRK.TEXT)- '); 
Readln(filenaie); 
U Filenaie=" then Ex it (LISTER) ; 
If Filenaie='t' then Filena«e:='SYSTEM.HRK.TEXT' ; 
(ttl-tl 

Reset! Tex tfile,Filenaie); 
Ioerror:=Ioresult; 
H Ioerror ■ 
then It FILE FOUND t) 
Begin 
WriteCPage title- '); 
Readln(Pagetitle); 
Pagenui:= 1; 
Startnetipage; 

(t READ AND WRITE TEXT *) 
While Not Eof (Textfile) do 
Begin 
Readln(Textfile,Textline); 
Mr iteln (Printer, Text line) j 
Linenui:= Linenui+1; (I Count lines I) 
If Endofpage then Startnenpage 
End; 

Page(printer); (t formfeed I) 
End 
else (I I/O ERROR t) 
Begin 
Hritelnf'I/O ERROR'); 

Case Ioerror of (t HOST COMMON I/O ERRORS t) 
3: Hriteln (* ILLEGAL OPERATION'); 
7: HritelnCBAD TITLE'); 
9: Hriteln ('VOLUME IS NOT ON LINE'); 
10: NritelnCNO SUCH FILE'); 
64: Hriteln ('BAD ADDRESS OR DATA ON DISK') 
End 
end 
Until Filenaie=" 
End. ft MAIN PROGRAM t) 
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Spanish Hangman 

2,000 SPANISH words and sentences 

taught in a fun way on the Apple. 

Send for your school's free 30-day 

evaluation diskette, from: 
George Earl 

1302 South General McMullen 
San Antonio, TX 78237 



Business Software by ADS 

For the Apple II and Atari/800. Why 
pay more for a bunch of unrelated 
programs? Business Plus will handle 
invoices, statements, credit memos 
and more, much more! Just $299 
complete or $25 for demo disk 
(credited towards purchase). VISA, 
Mastercharge accepted. 

Advanced Data Systems 

7468 Maple Avenue 

St. Louis, MO 63143 

314/781-9388 



Extended SYM-BASIC 

Adds 30 commands, requires 16K, 
$85 US/S95 Can., object on 
cassette, manual, and source listing. 
SYM-FORTH 1 .0: fig-FORTH for 
16K SYM-1. Editor, assembler, 
cassette interface $135 US/$155 
Can., object on cassette, manual and 
source listing. 

Saturn Software Limited 

8246 116ASt. 

Delta, B.C., V4C 5Y9 

Canada 



PET Arcade Software 

Astioidz and Munchman games for 
your 8K old-new ROMS. Astioidz 
are invading the galaxy. Four levels 
of play. Munchman is based on 
arcade game Pac-Man. ZIP and ZAP 
are out to get you. Fantastic 
graphics. $9.95 each cassette. 

ComputerMat 

Box 1664M 

Lake Havasu, AZ 86403 

PET/CBM Owners 

Real world software at low cost. 
2114 RAM adapter and 4K Memory 
Expansion for "old" 8K PETs. Write 
for free catalog! 

Optimized Data Systems 

Dept. M, Box 595 

Placentia, CA 92670 

(Continued on page 107) 
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The A2-GE1 

Graphics Editor 

for the 
Apple II 



The A2-GE1 Graphics Editor is a collection of 
programs designed to put the power of A2-3D1 
and A2-3D2 graphics in your hands. 

TheA2-GE1 includes Object Editor, Motion 
Programmer. Motion Playback, Slideshow Play- 
back, and a special A2-3D2 interface for BASIC 
programmers. 

With Object Editor you can create whatever 
objects you want in the colors of your choice. 
You can also type in whatever 3D text you want, 
and in different sizes. And saving an object is 
as easy as naming it. 

Then give the object names to Motion Programmer 

and see how the beautifully laid out keyboard 
controls will let you switch objects on or off, 
animate them, or add upper or lower case 2D 
text mixed right in. 

You can also record your entire presentation, 
animation and all, for later use with Motion 
Playback, or just take computer snapshots " 
of scenes with Slide Show Playback. 

We've reached our goal of giving you the most 
sophisticated graphics utilities in the market- 
place. ... 

» 

See them now at your dealer! 



Convenient 
graphics power. 



XA-478 



LOGIC 

Communications Corp. 
713 Edgebrook Drive 
Champaign, I L 61820 
(217)359-8482 
Telex: 206995 



Aople is the registered trademark of Apole Computer Inc 



$34.95 on disk (48K and 
A2-3D2 required) 

A2-3D1 with 3D2 Enhancement 

$84.90 on disk (48K required) 

*3D1 owners may update to 3D2 tor $24.95. Contact SubLOGK 
for details. 

For direct order, include $3 for UPS or $5 for first class mail delivery. 
Illinois residents add 5% sales tax Visa and MasterCard accepted. 



Elementary Pascal Internals 



Introduction to the internal 
structure of the P-machine and 
to some of the concepts which 
underly the workings of P-code 
Pascal implementations. While 
the examples are specific to 
Abacus Software's Tiny Pascal, 
others such as UCSD Pascal, 
Pascal/M, Dynasoft Cassette 
Pascal, Supersoft Tiny Pascal, 
and Programma Tiny Pascal are 
based on similar architectures. 



Arnie Lee 

Abacus Software 

P.O. Box 7211 

Grand Rapids, Michigan 49510 



Introduction 

My interest in the Pascal language 
stems from two observations and exper- 
iences: Pascal is a simple, yet powerful 
language with which to program, and 
Pascal is a simple language to imple- 
ment. These are, in fact, the goals 
which Wirth set out to meet.. as he 
defined the Pascal language in the late 
60's. "The first ... to make available a 
language suitable to teach program- 
ming as a systematic disciple based on 
certain fundamental concepts clearly 
and naturally reflected by the language. 
The second ... to develop implementa- 
tions of this language which are both 
reliable and efficient on presently 
available computers'". 

Apparently I'm not alone in feeling 
so positive about Pascal, since micro 
users have been flocking to use it. If the 
number of text book titles are any indi- 
cation of popularity, then we may con- 
clude that Pascal has indeed arrived. 

What makes Pascal so attractive? 
First, the number of language elements 
in Pascal is not so overwhelming as in 
other languages such as PL/ 1. Also, the 
elements are not cryptic as with the 



APL language. Yet even with a relatively 
modest vocabulary, Pascal affords a 
concise and clear language with which 
to program solutions to problems. Thus, 
the demand for Pascal is due, in part, to 
its simplicity and usefulness for a 
variety of applications. 

This great demand for Pascal is also 
easily satisfied, as the language is 
relatively simple to implement. Pascal 
has been implemented on most popular 
micros, and some versions will run in 
as little as 16K of memory. I have im- 
plemented a subset of the full Pascal 
language for the PET/CBM and Apple 
II. This undertaking required only 
modest effort. In the remainder of this 
article, I will share some of what I 
learned about Pascal internals. 

Pascal Compilers and Interpreters 

The statements of a high-level 
language such as Pascal are called a 
source program. The Pascal compiler 
translates the source program into a 
semantically equivalent program that 
can later execute on the micro. 

Some Pascal compilers translate the 
source program into machine code, 
which is directly executable by the 
computer. Most micro-based Pascal 
compilers translate the source program 
into P-code. P-code, however, cannot 
be directly executed by the computer. 
Instead, it needs to be interpreted. 

Interpreters spend a large amount of 
execution time determining the desired 
operations to be carried out on behalf of 
the program. (Most implementations of 
BASIC are interpreters.) A compiler, on 
the other hand, determines the opera- 
tions to be performed and creates code 
that reflects these operations. Then the 
code is executed at a later time. Since 
the operations are "predetermined" 
beforehand, a compiled program gener- 
ally executes faster than an interpreted 
program. Pascal systems such as UCSD 
Pascal, Pascal/M and Tiny Pascal, com- 
bine both concepts of compilation and 



interpretation. So, the source is com- 
piled, which predetermines the opera- 
tions to be performed, but the resultant 
P-code is interpreted by the P-machine. 

The P-Machine 

Most micro implementations of 
Pascal are based on a 16-bit pseudo- 
machine model. The pseudo-machine, 
often called the P-machine, "executes" 
P-code as its machine language. The 
P-machine performs its computations 
through stack operation. 

A stack is a data structure that is 
used to store data. The stack consists of 
multiple "slots" into which data may 
be stored, and from which the same 
data may be retrieved. The stack 
pointer always points to the next slot 
available for data storage. 

There are two operations that may 
be performed on the stack. PUSHing a 
value onto the stack means that a given 
data value is stored into the slot in- 
dicated by the stack pointer. After the 
value is PUSHed, the stack pointer is 
altered to point to the next available 
slot. Conversely, POPing a given data 
value means that the stack pointer is 
altered to point to the last used slot, 
and the value occupied by that slot is 
returned to the program. 

The P-machine is actually an inter- 
preter that is written in the assembly 
language of the micro. This interpreter 
simulates the operations of the hypo- 
thetical stack-oriented computer. The 
interpreter handles all of its operations 
as if it were a 16-bit computer by emu- 
lating all of its elementary operations 
(arithmetic, comparisons, input, etc.) 
using 16-bit data and stack operations. 
Each slot of the stack can accommo- 
date a 16-bit data item. When exe- 
cuting P-code "instructions," the 
P-machine expects the operands to be 
on the stack. The P-machine then car- 
ries out the computations and places 
the results back onto the stack. 
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Figure 1 is an example of a typical 
stack operation. We want to add two 
variables (B and C) and assign the sum 
to a third variable (A). The instruction 
is shown on the left, while the contents 
of the stack after the operation is 
shown on the right. 

Instruction 1 shows the stack before 
any operations take place. Instruction 2 
PUSHes the value of variable B onto 
the stack, thereby incrementing the 
stack pointer. Instruction 3 PUSHes 
the value of variable C onto the stack, 
also incrementing the stack pointer. In- 
struction 4 POPs the value of C off the 
stack, POPs the value of B off the stack, 
performs the addition, and finally 
PUSHes the sum onto the stack. The 
stack pointer is altered to point to the 
next available slot (previously occupied 
by C). Finally, instruction 5 POPs the 
sum off the stack and stores the result 
in variable A. The stack pointer is left 
pointing to the same slot as before the 
series of operations was executed. 

P-Code Instructions 

Instructions direct the P-machine to 
perform certain stack operations. These 
instructions are referred to as "P-code 
instructions" or just "P-code." It is the 
job of the compiler to convert the 
Pascal source statements to "P-code." 
After analyzing the Pascal source state- 
ments, the compiler generates the appro- 
priate P-code to perform the desired 
program operations. This P-code is 
later executed by the P-machine. Ex- 
ecution in this case really means that 
the P-code is interpreted by the 
P-machine. 

To continue the above example, 
let's look at the P-code produced by the 
Pascal language source statement in 
figure 2. 

This is the example shown pre- 
viously, using the mnemonics of a 
typical P-machine. Table 2 describes 
the mnemonics that are used in some 
typical Pascal implementations. Below 
is another example for a more complex 
arithmetic statement: 

A : = B + C DIV (D - 6); 

In figure 3, the compiler has to work 
a little harder to analyze the statement 
and generate the appropriate P-code. 
The operator precedence directs the 
compiler to first generate the P-code for 
the DIVide operation. (Division is per- 
formed before addition because division 
has a higher operator precedence. See 
table I..J Because of the parenthetical 
expression (D - 6), the P-code for that 
operation must be generated before the 



Figure 1: Typical Stack Operation 

Instructions 



1. Before any operations 



Stack Contents 



Stack Pointer 

-next available 
[stack empty) 



2. Load stack with B 



«— next available 



3. Load stack with C 



C 



-next available 



4. Add top two values on stack, 
deleting those values, and 
place sum on stack 



B + C 



r— next available 



5. Store value on top of stack in A 



-next available 
[stack empty] 



Figure 2 



A : = B + C; 



Resultant P-code: 



LOD B load stack with value of B 
LOD C load stack with value of C 
OPR ADD add two values on top of stack 
STO A store top of stack in A 
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Figure 3 



LOD 

LOD 

LOD 

LIT 

OPR 

OPR 

OPR 

STO 



D ~~l 
6 U 

SDR J 



D-6 



SDB 
DIV— 
ADD- 
A 



-C DIV (D - 6) 



>B + C DIV (D - 6) 



Tabla 1: Operator Precedence 



NOT 
* DIV MOD AND 
+ - OR 
=<>< <=> > 




lowest 



Table 2: P-Code Instructions 



The following table is a list of the P-code instructions that are used by 
this version of TINY Pascal PLUS + . The P-codes represent the instruction 
set of a hypothetical 16-bit stack machine similar to the one described by 
Wirth in his ALGORITHMS + DATA STRUCTURES = PROGRAMS. 



Opcode Operand 

(Hex) Mnemonic (Dec) 



M 


LIT 


n 


10 


OPR 





10 


OPR 


1 


10 


OPR 


2 


10 


OPR 


3 


10 


OPR 


4 


10 


OPR 


5 


10 


OPR 


6 


10 


OPR 


7 


10 


OPR 


8 


10 


OPR 


9 


10 


OPR 


10 


10 


OPR 


11 


10 


OPR 


12 


10 


OPR 


13 


10 


OPR 


14 


10 


OPR 


15 


10 


OPR 


16 


10 


OPR 


17 


10 


OPR 


18 


10 


OPR 


19 


10 


OPR 


20 


10 


OPR 


21 


20 + v 


LOD 


d 


20 + X'F' 


LOD 





30 + v 


STO 


d 


30 + XT' 


STO 





40 + v 


CAL 


a 


40 + X'F' 


CAL 





50 


INT 


n 


60 


JPC 


a 



61 


JPC 


a 


6F 


(PC 


a 


70 


CSP 





70 


CSP 


1 


70 


CSP 


2 


70 


CSP 


3 


70 


CSP 


4 


70 


CSP 


5 



Description 

Load literal constant to (SP) 

Return from procedure 

Negate (SP) 

Add(SP) to(SP-l) 

Subtract (SP) from (SP-1) 

Multiply (SP-1) by (SP) 

Divide (SP-1) by (SP) 

Test for odd 

(SP-1) modulo (SP) 

Test for (SP-1) = (SP) 

Test for (SP-1) > (SP) 

Test for (SP-1) < (SP) 

Test for (SP-1) > = (SP) 

Test for (SP-1) < (SP) 

Test for (SP-1) < = (SP) 

(SP-1) OR (SP) 

(SP-1) AND (SP) 

NOT (SP) 

Shift left (SP) 

Shift right (SP) 

(SP) +1 

ISP) -1 

Copy (SP) to (SP+1) 

Load (SP) 

Load from absolute addr (SP) 

Store (SP) 

Store at absolute addr (SP) 

Procedure call 

Call proc at absolute addr (SP) 

Increment stack pointer by n 

Jump to location a if low order bit of 

(SP > = ° , ,- t 

Jump to location a if low order bit of 

(SP) = 1 

Jump unconditionally to location a 

Input a single character 

Output a single character 

Input an integer 

Output an integer 

Input a hexadecimal number 

Output a hexadecimal number 

(Continued) 



P-code for the Divide operation is com- 
pleted. Finally, because of operator 
precedence rules, the P-code for the 
ADDition operation is generated. 



More Examples 

Listing 1 is a sample Pascal source 
program that performs some elemen- 
tary arithmetic operation. The program 
does not perform any useful work and 
is only meant to illustrate the follow- 
ing examples. 

Listing 2 shows the P-code that is 
generated by the compiler for the 
Pascal program of listing 1 . The listing 
shows the Pascal source statements 
and the respective P-code instructions 
generated for that statement. The 
listing also shows the memory location 
at which the P-code is temporarily 
stored and the internal format of the 
P-code. 

Listing 3 is a Pascal program called 
DISASSEM which can disassemble the 
P-code. This program disassembles only 
the P-code generated by the TINY 
Pascal PLUS + compiler, but the same 
technique may be used to disassemble 
any P-code, provided that the user is 
aware of the internal format of his Pas- 
cal system's P-codes. Table 2 shows the 
P-code formats for this implementation. 

Listing 4 is a sample disassembly of 
the Pascal program from listing 1. 
Listing 4 was produced by the DIS- 
ASSEM program. 



Arnie Lee is a data base analyst for a large 
manufacturing firm in the Grand Rapids, 
Michigan area. He is interested in all types 
of computer languages for micros, and 
hopes to develop data base systems for 
these smaller machines. He is co-author of 
Tiny Pascal and the author of the PET 
Machine Language Guide. 
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Olympic 

Sales 

ft* SERVING YOU SINCE 1947 

Company 

Main Showroom & Offices: , 

216 South Oxford Avenue visa' 

Los Angeles, CA 90004 Z± 

WE HONOR PP 

VISA and MASTERCHARGE W 



TELEX: 67 34 77 

ORDER DESKS open 7 DaysaWeek! 

7:00 AM to 7:00 PM Mon thru Sat 

Sunday Noon to 5:00 PM 

Order Desks: (213) 739-1130 

TOLLFREE TOLL-FREE 

(outside Calif.) (within Calif.) 

800-4218045 800-252-2153 



NO ONE UNDERSELLS OLYMPIC SALES 
Write & request our new 1 1 2 pg catalog- 
please include SI .00 to defray postage & 
handling-includes many more items-from 
TV's to Watches! 



topple 

YAmni IMf Immediate delivery 

VW1I l| JUIA1I16K- 32 K -48 K 64K Plus or Integer in stock! 



Vh «i in luthorired wrvicma Applidulir lot Applt II & III 
Immidme drhvery on ill mooeli-wi carry *n tnormou! Invinioiy 
of Appli products it ill limn! 



All goods sub/ect to availability, this ad super 

sedes all previous ads. we are not responsible 

for typographical errors,' we will meet 01 beat 

any advertised prices if the competition has 

the goods on hand. 

Minimum shipping and handling $4 95. 

All orders sub/ect to verification and acceptance. 




Laigr Inventory of. 
O.ifcwith controller 00S 3.3 
Second Dith Drives 
Piscal-Forlran-Cabol lm|uirj*i 
Dow Jones & Quote reporter 
Graphics Tablet) 
Vurcalc lor Apple II ft Ml 
Smartrrm B0 column card 
Micromodam II by OC Hayes 
and more. . . 



NEW. IMPROVED APPLE III 128K VERSION 

ATTENTION. Immadiate delivery 

WE AISO CARRY SOFTWARE 

Personal Software 

Peach Tree Sofiwti 

Microsoft 

Mi cro pro 

Innovative 

System Plus 



«% 



(VI 



HEWLETT PACKARD 

2 NEW DELUXE CALCS FROM HPI 
Slim, shirt-pocket styling 

NEW! HP-11C 

Advanced PiogummahlB 
Scientihc LCD flf.w SIMM 

NEW! HP-12C 

Advanced Programmable 

Financial LCD Hwtail Si 50 00 
HPI 25 New Microcomputer 

64K CPUTtr miner/Key boei 
HP-85 Microcomputer -bi 



Your Cost: 
S1 14.95 



Your Cost: 
SI 29.95 

ft*H>l Yoor Coil 

3'S0 0D 3195.00 
pnnter'monitor 

3250.00 2499.00 

HP-83 Microcomputer -builltn monitor 2250.00 1799.00 

HP 2631 B Printer, dot mux (ash lor optrti) 3<150 00 3199.00 

HPS790SA 80 col printer, dot matni 945.00 755.00 

HP-2601 A Letter quality prter. daisy wheel 3495.00 

HP 8290 1M Dual mailer (256KB disk drive) 2500.00 1999.00 

Call us for the lowest prices on 7 disk drives Call ui Call us 



HM1CV New' 2 2K byt< 
Card Reader lor 41 CV 
Ptinterlor 41 CV 
Quad Ram 
Optical Wand lor 41 CV 

HP-41C CalcuUlor 
Memory mod lor 41 C 
HP 97 Proqimble printer 
HP 34C Pro-jrmble scientific 
HP 3BC Piogimble business J 

We have the complete line 11 



Bi rt 



mary 



37500 


256.00 


215.00 


171.00 


385.00 


294.00 


95.00 


84.95 


125.00 


99.95 


250 00 


188 95 




2695 


150 00 


57995 


150 00 


117.95 


'50 00 


119.95 



XEROX 

Model 820-1 iS'A") 8" $3750.00 

64K COMPUTER & WORD PROCESSOR 

AS LOW AS $OMi*l discount MVIitlOlt tO 

ClflrlC nn Schools & Institutions Inomre' 

•K909.UU Reavirtd software *a*l 



NEW-FAMOUS CORVUS DISK DRIVES-5, 10, 20 
MEGABYTES with finuttic new OMNINET Network 
Call us lor the ben prices in the USA! System 



Texas Instruments 



New-1982 Modelwith Hnrnp ( 'ommir.-r 

full typewhter-siyle keyboard. ™°" ' < ( ! "' 
Tl 99/4A U/L case & 

New KEYBOARD 

SOC095 



369 s 



Uruil Yoiu . 
S3M100 $369.95 



New 
keyboai 



10" color monitm lor 99'4 "^^" 650.00 
KK Exp mem. module 399.95 

Extended Basic, a MUST lor 100 00 

32K module 
Speech synthesiser 150 00 

We cany a large mventoiy of software. 81 
accessories Vow Con 

Tl 30 ? iCSStu Slide NEW 1895 
Tl 35SPLCD SCIENTIFIC 22.50 
TI40 LCOSci/NEW 28.95 

TI-57 Prog Seiemilic 39.95 

TI-58C 480 Step. Prog. 89.95 

Tl S9 960 Step. Prog. 179.95 

PC 100C Pnnt/Ploi 149.95 

LCD-PfO'1'-: ■ ■ v ,'. 59.9S 



319 95 
31495 
75.00 




ATA T\ I L "'* ,n " n,0, v 

AlARkomput 



!-- ■ :i s >- ti i penphls. access, tie. 

ter AwrwrCM 

400 SPECIAL PRICE' I6K 595 DO 339 95 

No language inc.. opt'l basic. 54.95 

16K Computer 1080 00 759.95 

SPECIAL! 

ATARI 800 48K Computer 1250.00 86935 



OHIO SCIENTIFIC 

C8POF-48KRetail:$3495.00Y/C: $3195.00 

• Oual 6" Drives »64 col x 32 line/color 

• .7 MIPS f AST '•Many moreslnd featurei 

Fortran & Pascal available 
Many other OSl products Jt discounted prices 



PRINTERS 

• DIABLO (Leller Quality! Retail Your Cost 
630 R102 In directnal/tractors 7965.00 2699.00 
I640K109 keyboard, tractors 3077 00 2899 95 
630 RO Receive only 2710 00 2499.95 
1650K 136 keyboard/tractors 3220.00 2999 95 

• CENTRONICSdot matrix 

700 9 Parallel, heavy duty 
704-9 Serial, heavy duty 
737 I Parallel 
737 3 Serial 
704 11 Parallel 
P I Electrostatic 

• PAPER TIGER 
460 

460G (jripTi.es 
580 

560G giiphia 
445 
4450 

EPSON PRIN1 

MX80 

Optional Graft™ Chip 80 

MXtOFT 

WX80 i OHAFTRAX80 

MX80FT.GBAFTflAX80 

MXIO0 



146000 1199.95 

1795.00 1599.95 

99500 799.95 

1045.00 899.95 

187000 1695.00 

495.00 189.95 



995.00 


895.00 


1094.00 


969.95 


179500 


1099.00 


1391.00 


1195.00 


795.00 


695.00 


894 00 


18900 


bHS R„,ii 


Your Coil 



645 00 539.95 
95.00 
745.00 B59.9S 
695.00 579.95 
795.00 689.95 
995.00 WtJt 



WE ALSO HAVE . . . 

• NOVATION Modems 

CAT 

D-CAT 

APPLE CAT Direct connect 



Retail Your Cost 
19995 159.95 
19995 169.95 
349.95 314.95 



SANYO MONITORS High resolution 

13 " Color Inesvl high quality 550.00 41)45 

!2"Ginnphotphoioiii 360 00 251.9S 

IJ" euck & nhne 34000 2M,»S 

'- I <:.'.. -in- 370 00 2S9.95 

9" Slack 8 vihitt llhi bill ullr.l 735 00 169.15 

AMD E K(Leedex)High Quality Monitors 

100 12"B/W. I2MHi 173.00 119 95 

ICO G 12 'Groan, 12 MHi 199.00 17495 

330 G 12" Grtin. 18 MHi 249.00 199.95 
Color I 13" Color, NTSC comp. input. 449.00 339.95 

audio imp A ipuker 

Color II 13" Color. RBG input. 999.00 999.95 

hi rti graphic), ipao4.tr 

• HA2ELTINE Video Display Terminals 

• SHIIGARI Disk Orives 

• OEC VT100& VT103 

Call us for your DISCOUNTED price TOOAY! 



NEW! from Tl-Senes 10 Personal Information Terminal Retail 995.00 Youi Cost 795.00 





THE NEW MACROASSEMBLER FROM SDS 
PERFORMS ASSEMBLY LANGUAGE MAGIC FOR YOU! 



Makes Assembly Language program- 
ming easy for the novice as well as the 
experienced programmer. 
USER ORIENTED — manual includes 
many examples plus supplemental in- 
formation. 

MERLIN is not only FAST, but also has 
an extremely POWERFUL EDITOR. 
Nearly a dozen edit commands include 
block copy or move, line/character 
insert/change/remove, and a find & re- 
place function that makes it easy to 
modify existing files. 



Full Macro capabilities. 
28 Pseudo-ops, conditional assem- 
bly, arithmetic support. 
Supports 80 column and RAM cards 
when present. 

Compatible with TED II + files; can 
optionally be used to read, create 
and edit standard sequential text 
files. 

SPECIAL BONUS: Also included is 
SOURCEROR which creates labeled 
source files from raw binary object 
code. 



WHEN IT'S A PROGRAMMING TOOL YOU NEED, 
CONTACT THE APPLE UTILITY EXPERTS — SDS! 

P.O. Box 582-M, Santee, CA 92071 • 714-562-3670 



S64- 95 
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Table 2 


(Con 


inued) 




70 




CSP 


6 


70 




CSP 


8 


70 




CSP 


9 


70 




CSP 


10 


70 




CSP 


11 



Read keyboard without return key 
Output a string 

GRAPHICS set graphics mode for or 
Lo-Res graphics mode for Apple II 
COLOR sets color for Apple II or PET 
PLOT point at (SP- 1,SP) for PET 
and Apple II Lo-Res graphics 
POINT function at (SP- 1,SP). For 
PET returns if point is off and 
returns 1 if point is on. For Apple II 
returns the number of the Lo-Res 
color. 

TEXT sets text [non-graphics| mode 
HGRAPHICS sets Apple II Hi-Res 
graphics mode 

HCOLOR sets color for Apple II Hi- 
Res graphics 

HPLOT Hi-Res plot at (SP- 1,SP) for 
Apple II 

HPLOT Hi-Res plot from (SP-3, 
SP-2) to (SP-1,SP) for Apple II 
ABS(SP) absolute value function 
SQR(SP) square of value 
PDL(SP) read paddle 
TONE play tone on speaker 
Load with index (SP) 
Store with index (SP) 

The stack pointer is SP. It points to the top element on the stack. (SP) 
represents the contents of the top element. The address a is a P-code address. 
The displacement d is the displacement from a base address. The static level 
difference v is used by procedure calls to isolate variables. The number n is a 
numeric constant. 



70 



70 

70 

70 

70 

70 

70 
70 

70 

70 

AO + v 
BO + v 



CSP 



CSP 
CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

CSP 

LODX 

STOX 



12 



13 
14 

15 

16 

17 

18 
19 
20 
21 
d 
d 



Listing 1 




1: {* SAMPLE PASCAL PROGRAM TO DEMONSTRATE SOME 
2: OF THE ARITHMETIC STATEMENTS IN OF THIS 
3: IMPLEMENTATION OF PASCAL. *) 

A. 


5: CONST CR=13; 

6: 

7: VAR A.B.C: INTEGER; 

8: 

9: BEGIN 

10: A := 0; (* 

11: A := B; (* 

12: A := B + C; (* 

13: A := B - C; (* 

14: A :» B * C; (* 

15: A := B DIV C; (* 

16: A := B MOD C; (* 

17: A :■= SQR(B); (* 

18: END. 






CONSTANT ASSIGNMENT *) 
VARIABLE ASSIGNMENT *) 
ADDITION *) 
SUBTRACTION *) 
MULTIPLICATION *) 
DIVISION *) 
MODULO DIVISION *) 
SQUARE FUNCTION *) 


*** 18 LINES IN FILE *** 





Listing 2 




TINY PASCAL PLUS+ 


FROM ABACUS SOFTWARE 


ADDR REL. CODE 0PND. ADDR 


SOURCE CODE 








8600 JPC 15 


(* SAMPLE PASCAL PROGRAM TO DEMONSTRATE SOME 
OF THE ARITHMETIC STATEMENTS IN OF THIS 
IMPLEMENTATION OF PASCAL. *) 


CONST CR=13; 

(Continued) | 



MICRObitS (continued) 

The Index 

Over 12,000 magazine and 
newsletter articles, editorials, and 
columns from magazines such as 
MICRO, BYTE, COMPUTE!, 
Interface Age. Over 40 magazines 
and newsletters indexed by machine 
types like Apple, Atari, TRS-80, and 
more. Order from your local 
computer store. Price $14.95 plus 
50C shipping. 

Missouri Indexing 

P.O. Box 301 

St. Ann, MO 63074 

(213) 997-6470 

OSI Software 

Universe (by the author of Galaxian) 
is a super smooth arcade game 
played by a keyboard or joystick — 
$14.95. Edit All includes a full 
screen editor, scroll window output, 
full cursor control and more — 
$19.95. For C1P, C2-4 systems. 

DMP Systems 

319 Hampton Boulevard 

Rochester, NY 14612 

Ohio Scientific C4P 

Games: Galactic Trader, Drag Racer 
II, Missile Defense, Shuffle Bowling, 
Lunar Lander and more! Many with 
graphics, real time action, color and 
sound. Other programs: Transformer 
Design, Home Budget. Send SASE 
for catalog to: 

Ron Lashley Software 

2934 W. Missionwood Circle 

Miramar, FL 33025 

OSI Non-Symbolic Disassembler 

Now look at machine code programs 
in disassembled format. Standard 
6502 mnemonics. Screen control 
features, step through memory to 
look at ROM and RAM routines. 
Runs in under 2K memory. Autoload 
cassette only $9.95. A real 
programmer's tool. 

Computer Science Engineering 

10 Liberty Avenue 

Burlington, MA 01803 

Medical Computer Journal 

The journal for computer use in 
daily practice. Programs, system 
description, laboratory, original 
articles. Bound Vol. I — $17.00, 
subscriptions — $15.00/year. 

Medical Computer Journal 

A. Ghaussey 

42 E. High Street 

East Hampton, CT 06424 

(Continued on page 109) 
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JAY ROSENBERG'S 



SUPER 
SKETCH 



THE ULTIMATE 
GRAPHICS PROGRAM 

• KEYBOARD OR 
PADDLE CONTROL 

• DRAW ALPHA-NUMERICS 

OP ANY SIZE, COLOR OR ANGLE 

• MERGE ANY HI-RES 
PICTURES TOGETHER 

" CREATE AND SAVE SLIDE SHOWS 

« MOVE ENTIRE 

HI-RES PICTURES ANYWHERE 
ON THE SCREEN 

• APPLE II* <i8K DISK 



TO ORDER: SEND $2'*. 95 TO 

JAY ROSENBERG'S SUPER SKETCH 
5 PRASEft AVE. 
KOHTICELLO. N.Y. 12701 
N.Y.S. RESIDENTS ADD 7)5 SALES TAX 



New 

MICRO 

Department 



If you have an idea which is not suited for a 
lengthy article, but is nonetheless interesting 
and useful, submit it to MICRO'S Short 
Subjects department. 

Write-ups for this section should be brief 
and concise. Cover your topic in just a few 
paragraphs. We'll also accept short listings. 



• Contributors to this section will not be paid, 
but will receive full credit and 
acknowledgement with a byline. 






Wo 



Aocta$ 




The Software Management System 




Disk Library is an elegant, user-oriented system for creating and maintaining a thorough, cross-referenced Index of all 
your disk-based programs and data files. It provides for Automatic entry into your Library file of the full catalog of any Apple* 
diskette. Disks formatted under other operating systems (such as Pascal and CP/M*) are easily entered from the keyboard. 
Written entirely in machine code, Disk Library's operation is both smooth and swift. 



EASY TO OPERATE: 



Menu-driven • User-definable prompt defaults 

Single keystroke operation • Full feotured Editing 

Super fast Sort* (1 200 items in 4 sec!) 

Works with all disks created under DOS 3. 1 , 3.2 and 3.3 

User definable Program Types (e.g., Business, Game, Utility) of up to 15 

characters eoch con be assigned to each program entry with single keystroke 

or via block actions. 

On-screen ond printed Summaries, by File Type (Inter, Applesoft, Binary, 

Text) and by Program Type. 

Block Actions (global editing/deleting) 

Instant Searches. . . find any item in 1/3 sec. 

Append new files to existing ones, in memory or on disk 

Unique Feature: User con redefine the Disk Volume Number displayed by 

'he DOS Catalog Command 

Assign a unique Identifier and Title to each disk in your library 

Printed Reports are formatted for eosy reodibility 



EASY TO ORDER: 



Use your Visa or MasterCard 
ANYDAY, ANYTIME 



TOLL FREE: 1-800-331-1750 (For orders only) 

Ask for operator 948, Dept. 400 
(InOkla.): 1-800-722-3600 operators 



Or send check or money order to' 
ftondo residents add 4% sqIcS *a> 



■MODULAR 
■MEDIA 

DDirCi ClO OS Rpeeiol Introductory oi'er 

WHAT YOU NEED: 

• A 48K Apple II or II + with DOS 3.3 

• A desire to get organized 1 



$49.95 



iRegulor Price} 



EASY TO LEARN: 



The 75 page, professionally prepared User's Guide is oriented to the needs 

of beginners and experts 

Incls.: Tutorials, Reference and Applications Sections, ond Index 



ffli 



V 



11060ParadelaSt. ( Miami. FL 33156 (305) 661-7310 
Developers/ Publishers of Innovative Software 

' Apple. Apple il ona* Apple It + ore registered trademarks oi Apple Computer. Inc 
CP/M is o registered trademark o* Digital Research. Inc 
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Listing 2 /Continued) 






1 
















1 
1 
1 


VAR A.B.C: INTEGER; 












BEGIN 














1 


A :* 0; 

****ADDR AT 


(* CONSTANT ASSIGNMENT *) 
CHANGED TO 1 


8603 


1 


INT 





6 








8606 


2 


LIT 














8609 


3 


STO 





3 


4 


A := B; 


(* VARIABLE ASSIGNMENT *) 


860C 


4 


LOD 





4 








860F 


5 


STO 





3 


6 


A := B + C; 


(* ADDITION *) 


8612 


6 


LOD 





4 








8615 


7 


LOD 





5 








8618 


8 


OPR 





2 








861B 


9 


STO 





3 


10 


A :- B - C; 


(* SUBTRACTION *) 


861E 


10 


LOD 





4 








8621 


11 


LOD 





5 








8624 


12 


OPR 





3 








8627 


13 


STO 





3 


14 


A := B * C; 


(* MULTIPLICATION *) 


862A 


14 


LOD 





4 








862 D 


15 


LOD 





5 








8630 


16 


OPR 





4 








8633 


17 


STO 





3 


18 


A := B DIV C; 


(* DIVISION *) 


8636 


18 


LOD 





4 








8639 


19 


LOD 





5 








863C 


20 


OPR 





5 








863F 


21 


STO 





3 


22 


A := B MOD C; 


(* MODULO DIVISION *) 


8642 


22 


LOD 





4 








8645 


23 


LOD 





5 








8648 


24 


OPR 





7 








864B 


25 


STO 





3 


26 


A :- SQR(B); 


(* SQUARE FUNCTION *) 


864E 


26 


LOD 





4 








8651 


27 


CSP 





19 








6654 


28 


STO 





3 


29 


END. 




8657 


29 


OPR 














*** 


LENGT> 


OF P-CODE IS 92 


*** 







Listing 3 



1: 
2: 

3: 

4: 

5: 

6: 

7: 

8: 

9: 

10: 

11: 

12: 

13: 

14: 

15: 

16: 

17: 

18: 

19: 

20: 

21: 

22: 

23: 

24: 

25: 

26: 

27: 

28: 

29: 

30: 

31: 

32: 



i* 



DISASSEM - A P-CODE DISASSEMBLER 

BY ARNIE LEE 
ABACUS SOFTWARE 
P.O. BOX 7211 
GRAND RAPIDS, MI 49510 

THIS PROGRAM WILL WORK ON EITHER THE PET OR APPLE II. 
IT ASSUMES THAT THE P-CODE FILE TO BE DISASSEMBLED 
HAS ALREADY BEEN LOADED BY AN ALTERNATIVE METHOD. 



*) 



CONST CR-13; 

FALSE-1; 
TRUE-O; 



VAR STARTLOC.NUMINSTR, 

LASTPCODE.PCTR.INSTR, 
MODIFIER, OPERAND: INTEGER; 

BEGIN 

NUMINSTR:-0; 
LASTPCODE: -FALSE; 

WRITE( 'ENTER P-CODE STARTING LOCATION-) '); 
READ(PCTRS); 

WHILE LASTPCODE-FALSE DO 
BEGIN 

INSTR:-MEM(PCTR) SHR 4; 

MODIFIER:-! (MEM(PCTR)) SHL 12) SHR 12; 

OPERAND :=MEM(PCTR+1) + MEM(PCTR+2) SHL 8; 

NUMINSTR:=NUMINSTR +1; 

WRITE(PCTR%,' '.MEMIPCTR)*,' ',MEM(PCTR+1)S,' ',MEM(PCTR+2)%, '); 



MICRObits 



(continued) 



OSI BASIC LOAD & SAVE 

w/Filename 

Tired of LOAD SAVE times, tape 
documentation? Cry no more. Now 
SAVE with filenames on your 
cassette programs. LOAD by 
filename. Gives directory of tape as 
you go. Employs a token I/O system 
to decrease tape I/O by 50% — 
$10.95. 

Computer Science Engineering 
57 Beals Street, Rm. 57-12 
Brookline, MA 02146 

Graphics Utility for the Apple II 

Ampergiaph adds 21 Applesoft 
commands which allow effortless 
generation of graphs of scientific or 
financial data. The imbedded 
commands include &SCALE, 
&LIMIT, &AXES, &GRID,&FRAME, 
&LOGX, &LOGY, &LABELAXES, 
&LABEL, &DRAW, &PENUP, 
&ERRORBARS, etc. System: DOS 
3.3, 48K — $25.00 ($1.00 shipping). 

Madwest Software 

Department M 

P.O. Box 9822 

Madison, WI 53715 

Commodore VIC 20 

3K Memory Expansion — $59.95 
ppd. Plugs in in seconds. VIC 
Graphic Manual — $11.95. Most 
complete documentation on Hi-Res 
with tape. Joystick Software: 
Spider's Pailoi, Packman, U.F.O., 
Asteroids, SJ Slither — $5.95 each. 
SASE brings information. 
Peripheral Products 
3030 So. Vermont Avenue 
Royal Oak, MI 48067 

Wanted: OSI 300 board and... 

early 400 series boards, 
documentation and catalogs from 
1977 and earlier. 

Edward H. Carlson 

3872 Raleigh Drive 

Okemos, MI 48864 

(517) 349-1219 

Adventure #1 — Murder Mansion 

You and six other people are 
exploring a three-story mansion for a 
hidden treasure. But watch out\ 
Someone has decided to get greedy 
and is killing the others. You could 
be next! 8K OSI C1P-C4P — $12.95. 
32K TRS-80 Model I and m 
(graphics) - $15.95. 

Comp-U-Game Software 

P.O. Box 802 

Nevada, MO 64772 

JUCftO 
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Listing 3 (Continued) 



33: 
34: 
35: 
36: 
37: 
38: 
39: 
40: 
41: 
42: 
43: 
44: 
45: 
46: 
47: 
48: 
49: 
50; 
51: 
52: 
53: 
54: 
55: 

56: 

57: 

58: 

59: 

60: 

61: 

62: 

63: 

64: 

65: 

66: 

67: 

68: 

69: 

70: 

71: 

72: 

73: 

74: 

75: 

76: 

77: 

78: 

79: 

80: 

81: 

82: 

83: 

84: 

85: 

86: 

87: 

88: 

89: 

90: 

91: 

92: 

93: 

94: 

95: 

96: 

97: 

98: 

99: 

100: 

101: 

102: 

103: 

104: 

105: 

106: 



CASE INSTR OF 

0: WRITECLIT ' ,MODIFIER#,' ' .OPERANDI, CR); 
1: BEGIN 

WRITECOPR '); 
CASE OPERAND OF 

0: WRITE! 'RETURN'); 
WRITE ('NEGATE'); 
WRITE('ADD'); 
WRITE('SUBTRACT'); 
WRITE) 'MULTIPLY'); 
WRITE('DIVIDE'); 
WRITE! 'TEST ODD'); 
WRITE( 'MODULO'); 



1: 

2: 

3: 

4: 

5: 

6: 

7: 

8: 

9: 

10: 

11: 

12: 

13: 

14: 

15: 

16: 

17: 



WRITE 
WRITE {' 

WRITEC 
WRITE! ' 
WRITEC 
WRITE!' 



'); 
<> '); 
< '); 
>■ '); 
> '); 
<■ 



WRITE!' OR '); 
WRITEC AND '); 
WRITEC NOT '); 
WRITEC SHL '); 



18: WRITEC SHR '); 
19: WRITEC +1 '); 
20: WRITEC -1 '); 
21: WRITE('COPY') 
ELSE WRITEC INVALID") 
END; 

WRITE(CR); 
END; 
2: WRITE! 'LOD ' .MODIFIER*, ' ' ,OPERAND#,CR) 
3: WRITECSTO ' .MODIFIER*,' ', OPERAND*. CR) 
4: WRITE! 'CAL '.MODIFIER*.' ' ,OPERAND*,CR) 
5: WRITEC INT '.MODIFIER*,' ' .OPERAND*, CR) 
6: WRITE! 'JPC '.MODIFIER*,' '. OPERAND*. CR) 
7: BEGIN 

WRITECCSP '); 
CASE OPERAND OF 
0: WRITE! 'INCHR'); 
1: WRITE! 'OUTCHR'); 
2: WRITEC INNUM'); 
3: WRITE! 'OUTNUM'); 
4: WRITEC INHEX'); 
5: WRITE('OUTHEX'); 
6: WRITE('INKEY'); 
8: WRITE! 'OUTSTR'); 
9: WRITE! 'GRAPHICS'); 
10: WRITE('COLOR'); 
11: WRITE('PLOT'); 
12: WRITE! 'POINT'); 
13: WRITE('TEXT'); 
14: WRITE! 'HGRAPHICS'); 
15: WRITE! 'HCOLOR'); 
16: WRITE! 'HPLOT X.Y'); 
17: WRITE! 'HPLOT X.Y TO A.B'): 
18: WRITE('ABS'); 
19: WRITE('SQR'); 
20: WRITE('PDL'); 
21: WRITE('TONE') 
ELSE WRITE! 'INVALID') 
END; 

WRITE(CR); 
END; 
10: WRITE! 'LODX'. MODIFIER*,' '.OPERAND#.CR); 
11: WRITE! 'STOX', MODIFIER*,' ',OPERAND*,CR); 
15: BEGIN LASTPCODE:-TRUE; WRITE! 'EOF \CR) END 
ELSE WRITEC INVALID P-CODE INSTR.') 
END; 
PCTR:«PC7R ■» 3; 
NUMINSTR:-NUMINSTR + 1; 
END; 

WRITE!'* INSTRUCTIONS DECODED->' ,NUMINSTR*,CR); 
END. 



*** 106 LINES IN FILE *** 



Listing 4 










ABACUS 


SOFTWARE 


TINY 


PASCAL INTERPRETER 


■NTER 


FILE 


NAME 


OF P- 


CODE DISASSEM 


TRACE ACTIVE(Y/N)?N 




ENTER 


P-CODE STARTING 


LOCATION-) 8000 


8000 


006F 


0001 


0000 JPC 15 1 


8003 


0050 


0006 


0000 


INT 6 


8006 


0000 


0000 


0000 


LIT 


8009 


0030 


0003 


0000 


STO 3 


800C 


0020 


0004 


0000 


LOD 4 


800F 


0030 


0003 


0000 


STO 3 


8012 


0020 


0004 


0000 


LOD 4 


8015 


0020 


0005 


0000 


LOD 5 


8018 


0010 


0002 


0000 


OPR ADD 


801B 


0030 


0003 


0000 


STO 3 


801 E 


0020 


0004 


0000 


LOD 4 


8021 


0020 


0005 


0000 


LOD 5 


8024 


0010 


0003 


0000 


OPR SUBTRACT 


8027 


0030 


0003 


0000 


STO 3 


802A 


0020 


0004 


0000 


LOD 4 


802D 


0020 


0005 


0000 


LOD 5 


8030 


0010 


0004 


0000 


OPR MULTIPLY 


8033 


0030 


0003 


0000 


STO 3 


8036 


0020 


0004 


0000 


LOD 4 


8039 


0020 


0005 


0000 


LOD 5 


803C 


0010 


0005 


0000 


OPR DIVIDE 


803F 


0030 


0003 


0000 


STO 3 


8042 


0020 


0004 


0000 


LOD 4 


8045 


0020 


0005 


0000 


LOD 5 


8048 


0010 


0007 


0000 


OPR MODULO 


804B 


0030 


0003 


0000 


STO 3 


804E 


0020 


0004 


0000 


LOD 4 


8051 


0070 


0013 


0000 


CSP SQR 


8054 


0030 


0003 


0000 


STO 3 


8057 


0010 


0000 


0000 


OPR RETURN 


805A 


OOFF 


OOFF 


0000 


EOF 


# INSTRUCTIONS 


DEC0DED~>62 


*** EXIT PASCAL 


INTERPRETER *** 


3255 INSTRUCTIONS EXECUTED 


HIGHEST STACK ADDRESS 


USED - $ 



JMS8Q_ 




THE ULTIMATE 

HI-RES SCREEN PRINT PROGRAM FOR 

THE EPSON MX-80 OR MX-100 

• Totally menu-driven, leading the user 
through the selection process. 

• Single keystroke menu selection. 

• Stacking of several images for 
subsequent. UNATTENDED printing. 

• Inverse and OVERIAYED printing. 

• Picture pre-view (including inverse 
and overlayed). 

• Load images from disk automatically. 

• Centered output, user titles ... more. 

The program requires a 48K Apple II. or Apple II plus 
with DOS 3 3. and an Epson MX-80 or an MX-100 
(equipped with Ihe Graftrax option) ECHO may be 
used with the following parallel interface cards 
1) Apple 2) Epson 3) Tymac or A) CCS. 

Price: $49.95 

Dealer inquiries invited. 

(N J add 5% soles tax. Foreign odd S5.00 air mail) 
Send check or money order to: 

HndWarc 

P.O. BOX 871. N. ARLINGTON. NJ 07032 
'Apple — Trademark of Apple Computet inc 



^^^^^s^^^^^^^^^^^^^^^^ ^^^ ^^^ aj 



s /V1ICRO 

' BUSINESS WORLD INC. 

S Information Line (213) 996-2252 

| TOLL FREE MAIL ORDER LINES 

t (800) 423-5886 outside cam. 



COMPUTERS 

fgcipple compotor 







Our 




List 


Price SAVE 


Apple II-16K 


S1330.00 


$999.00 S331.00 


Apple II-32K 
Apple II-48K 


1430.00 
1530.00 


SPiCIAL | 


Apple II-64K 


1725.00 


CALL j 


Apple III 128-K 


3915.00 


2997.00 918.00 



[ ALTOS 8CS 6000-15 -99000 4*5000 164000 
SHARP-64K Z80 FULL KBD YX-3200 CALL 



NEC PC 8P01 



1295 00 1050.00 



ATARI PERSONAL 
COMPUTERS 

400 16K Bytes ol Ram 
800 16K Bytes ol Ram 
410 Program Recorder 
810 Disk Drive 
825 Printer (80 col- 

Centronlc 737) 
820 Printer (40 col 

Impact) 
830 Acoustic Modem 
850 Interlace Module 
Atari Vlsicalc 
Atari 400-16K 



Lilt 

595 00 

S 1080 00 

90 00 

600.00 

999.95 

450 00 
200.00 
22000 
200.00 
595.X 



Our 
Price 

337.45 

739 00 

77.00 

457.00 



SAVE 

257.05 

332.00 
11.00 
143.00 



769.00 230.00 



353.00 
155.00 
192 00 
164.00 
32700 



97.00 
45.00 
41.00 

34.00 

304.00 



IflSI PACKARD 


Lilt 


Our 
Price 


SAVE 


HP- 125 Microcomputer 


3750 00 


2990 00 


760.00 


HP-85 Microcomputer 


3250 00 


2475.00 


775.00 


HP-83 Microcomputer 


2250.00 


1777.00 


473.00 


16K Exp-Memory 








Module 


295.00 


255.00 


40.00 


Graphics Plotter 7225 


245000 


207500 


375.00 


Personality Mod 








lor 7225 


750 00 


665 00 


85.00 


26318 Impacli printer.' 








hvydty 


3950.00 


3250.00 


700.00 


Option 020 tor 26316 
8 Drives to choose Irom 


150 00 


125.00 


25.00 








82902S 


1300 00 


1125.00 


195.00 


9895A 8" Dual Drive 


6850 00 


5500.00 


1350.00 


Graphics Tablet 911 1A 


2050 00 


1678 00 


37400 


HP-41 OV New 2.2 








bytes mem 


325.00 


250.00 


75.00 


HP-41-C Calculator 


250.00 


185 00 


65.00 


Card Reader lor 








41CV/C 


215.00 


162.00 


53.00 


Printer lor 41CVC 


385 00 


289.00 


101.00 






Optical Wand lor 

41 CViC 
Quad Ram eauals 

4 Mem. Mods 
Memory Modules lot 

41 C 
HP-97 Programble 

Printer 
HP-67 Progtomble 

Calculator 
HP-34C Programbte 

Scientllic 
HP-38C Programble 

Bus RIE 150.00 117.00 33.00 

HP-32E Adv Scientific 55.00 48.00 7.00 

HP-37E Business Mgmt. 75.00 57.00 18.00 

We corrya large inventory otLibrones. accessories and 
supplies. 



12500 
9500 



750 00 

37500 

150.00 

150.00 
55.00 
75.00 



97 00 

81.00 

25.00 

595.00 

29500 

117.00 

117.00 
48.00 
57.00 



PRINTERS 



EPSON 


List 


Our Price 


MX 80 f T 


745.00 


549.00 


MX 80 IMPACT 


645 00 


450.00 


MX 70 IMPACT 


500 00 


390.00 


MX 100 


995.00 


765.00 


APPLE SILENTYPE 64500 


299.00 


AN ADiX 9501 


1650 00 


1299.00 


NEC 






5510 


3195.00 


2445.00 


5515 


3295.00 


2545.00 


3510 


2495.00 


1795.00 


3515 


2545.00 


1849.00 


OKIDATA 






MCBOLINE 80 


545.00 


39500 


MCROUNE 82 


649 00 


549.00 


MCROUNE 83 


1050.00 


769.00 


PAPER TIOER 






445G with Graphics 


795.00 


695.00 


460G with Graphics 


1,394.00 


899.00 


560G New lull s«e 


1 .695.00 


1.139 00 


DIABLO (LETTER QUALITY) 




630 R102 bi-directional 




tractors 


2.965 00 


2.350.00 


1640K109 keyboard 






tractors 


4,000 00 


2,899.00 


630 RO Receive Only 


2.71000 


2.250.00 


1650K 136 keyboard 






tractors 


4,000 00 


3.10000 



SAVE 

196.00 
195.00 
110.00 
230.00 
346.00 
351.00 

750.00 
750.00 
700.00 
696.00 

150.00 
100.00 
281.00 

100.00 
495.00 
556.00 



1,100.05 
460.00 



SPECIAL OF THE MONTH 

=64K 



APPLE II PLUS 
48K W/16K 
EXPANSION BOARD 



Our price 
$1199°° 




List price S1780.00 
Our price S1 199.00 

Save $581.00 



APPLE II STUDENT^ 
SYSTEM 

• Apple II Plus Syilem-48K RAM 

• Disk II Floppy Disk & 
Interface (DOS 3.3) 

• 12' Crn. Phs. Video Monitor 





MONITORS 



NECGrn Phs 12' 
BMC Green Phs 12" 
Zenith 12" 



List 

S285.00 
27500 
159.00 



SANYO MONITORS 

High Resolution, Number 1 sailer 



13" Color (new) 

high quality 
12" Green Phosphorous 
12" Black & White 
15" Black 8. White 

9" Block & White 
The Best Sellen 



Lisi 

$55000 
360.00 
340.00 
37000 



235 00 145 00 



Our 

Price 

239 99 
229.00 
11900 



Our 
Price 

388 00 
240.00 
21700 
23500 



SAVE 

S46.00 
46.00 
30.00 



SAVE 

$162.00 
120.00 
123.00 
135.00 



90.00 



DISKETTES 

SOLD IN BOXES OF 10 
(Min. Purchase) 
BUY SI 00 of the 
l-'ollowhiK Diskettes List 
DYSAN 




1041 5" SOFT SECTOR 
104' 1D ■" DBL 

DEN -SOFT SEC 
37401 8" SOFT SECTOR 
3740' 1D8 - D8L 

DEN -SOFT SECTOR 
MAXELL 

MD-1 5 - SOFT SEC- 
TOR DBl DEN 

MD-2 = " SOFT 

SECTORDBL SIDE'DBl 
DEN 

FO-1 8" SOFT SEC iDBL 
OEN 

FD-2 8' SOFT SEC 081 
SIDE DBl DEN 



PRICE PER DISKETTE 



640 
7.25 



460 
475 



1.80 
2.50 



TERMINALS 

TELEVIDEO 



910 

912C 

920C 

_950C 

fDRI> 

I CORVUS 

I S MBYTFS 

I 10 MBYTES 

I 20 MBVTES 





Our 


Lisi 


Price 


699 00 


599 00 


95000 


699 00 


995.00 


795 00 


1.195 00 


949.00 



SAVE 

100.00 
251.00 
200.00 
244.00 



DRIVES 



3.750.00 
5.350 00 
6.450 00 



smanamsnisaB-^Enmi 




050.00 
,449.00 

,450 00 



700.00 

901.00 

1,125.00 



SOFTWARE 






FOR APPLE II 








List 


Our 

Price 


SAVE 


Apple Fortran S 


200.00 S 


147,00 % 


51.00 


DOS 3 3 (16 Sector) 


60.00 


45.00 


15.00 


Apple PILOT (i6 Sector) 


150 00 


119 00 


11.00 


Apple FORTRAN 








(requires A2B00O6) 








(16 Sector) 


200.00 


159 00 


41.00 


language System with 
Appte Pascal 


495 00 


399.00 


96.00 


BPI General Ledger 








System 


395 00 


319 00 


76.00 


BPI Inventory Package 


395 00 


319 00 


76.00 


Visidex 


200 00 


159 00 


41.00 


Vlsicalc 


200 00 


159 00 


41.00 


Desktop Plan It 


200 00 


159.00 


41.00 


Microlab Database 








System 


15000 


119.00 


31.00 


Stoneware DB Master 


229 00 


18900 


40.00 


Muse Supertax! 11 


150 00 


119 00 


11.00 


Softape Magic Winaow 


99.00 


72 00 


27.00 


TEXAS INSTRUMENTS 


Ti W/dA Console New 








improved 


950 00 


38595 


564.05 


10" Cotor Monitor High 








Resolution 


374 95 


31795 


57.00 


32K Memory Module 


399 95 


312.95 


87.00 


Speech Synthesizer 


149 95 


127.95 


22.00 


Disk Memory Drive 


499 95 


39095 


109.00 


RF Modukitor 


49 95 


42 50 


7.45 


Telephone Coupler 








(Modem ) 


224 95 


185.95 


19.00 


Printer (Solid S-dte) 


399 95 


315.95 


84.00 










MODEMS 








NOVATION CAT MODEM 


189 95 


140 00 


49.95 


NOVATON DCAT 


199 00 


150 00 


49.00 


NOVATION APPLE-CAT 


349 00 


310 00 


19.00 


HAVES MICROMODEM 


379 00 


295 00 


84.00 


HAVES SMARTMODEM 


279 00 


239 00 


40.00 










CALCULATORS 






CASIO 








HR-10 


49 95 


39.00 


10.95 


HR-12 


54.95 


42,00 


12.95 


FR-100 


79.95 


59 00 


20.95 


FR-1210 


129 95 


99.00 


30.95 


PQ-20 


29 95 


2300 


6.95 


LC-785 


12 95 


1000 


2.95 


LC-3165 


12 95 


10.00 


2.95 


FX-68 Scentltic 


29.95 


2300 


6.95 


FX-81 Sc^nlilic 


1995 


17 00 


2.95 


FX-3600P Scientific 


39.95 


29.95 


10.00 


FX-602P 'Computer 








Tdlk" 88 Memories Pro 








gromming upper & 








Lower Case Dot Matrix 


129 95 


99 00 


M.95 


FX-702P Solves Problems 








with Alpha-Numeric 








Clarity, uses Basic 








Language 


199 95 


159.00 


40.95 


*■ 








TELE. ANSW. DEVICES 


PHONE MATI 








900 


119 95 


86 00 


U.95 


905 Remote 


199 95 


144 00 


55.95 


910 


159 56 


115.00 


44.95 


920 


199 95 


144.00 


55.95 


925 Remote 


239 95 


17300 


66.95 


930 Remote 


299 95 


21600 


81.95 


950 Remote 


339 96 


245,00 


94.95 


960 Remote 


399 95 


2M.00 


111.95 



Fail /VI1CRO business world 

H H ffl? • P ' £*' ' t ■'-> WAREHOUSE 

t"! ■ -ji> S ' 18720 Oxnard. »108 Tarcana. CA 91356 
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The BEST games are from Creative Computing Software 

1978: Adventure 

1979: Air Traffic Controller 

1980: Super Invader 

1981: Blister Ball 
and Mad Bomber 



Blister Ball 

Blister Ball is the first completely original 
arcade-type game for a computer. Not a 
copy, not an adaptation, not a spinoff. Blister 
Ball is new— its a new idea— better than 
Invaders, better than Circus, better than 
Asteroids, better than Galaxian. If you've 
played other games for hours, you'll play 
Blister Ball for days. 




V 



How does it work? Well, some mean but 
fun-loving aliens have produced some 
bouncing bombs. First they drop one and 
you've got to position yourself under it and 
zap it with your laser. If you miss, that's 
OK. It will bounce around, although each 
bounce is lower, and you have several 
chances to zap it. Got the hang of it? OK, 
here come two bouncing bombs. You zap 
them. Then you're faced with three, then 
four and five. 

As they bounce longer and longer the 
walls begin to close in so you're faced with 
either zapping the bombs or being hit. Each 
hit knocks you a little further toward the 
gutter. But you can survive two hits which 
is usually enough to zap all the bombs. 



Feeling confident? Don't. Because after 
5 bombs the murderous little devils drop 5 
bonus bombs, worth ten times as much. 
These don't bounce, so you get only one 
shot. You need nerves of steel and the 
reflexes of a tail gunner. 

After you complete one round, the game 
starts again with bombs that bounce faster 
and lower (and are worth more) than the 
previous ones. 

Blister Ball is a fantastic solo game. But 
there are two-player options as well in which 
players can play as a team or as opponents. 
Each player can move the entire width of 
the screen and zap any of the bombs. Here, 
you're not only trying to survive, but trying 
to outscore your opponent. The game has 
two skill levels. 

Mad Bomber 

In Mad Bomber you are faced with aliens 
in a huge ship hovering overhead. They 
have bomb racks which they constantly fill 
with bombs. Your object is to move from 
side to side on the ground and zap the 
bombs in the bomb racks or as they fall. 




As the game progresses, the aliens fill 
up their bomb racks more quickly and the 
bombs fall faster. You lose after ten bombs 
have hit the area which you are defending. 

Mad Bomber can be played by one player 
solo or by two players as a team or as 
opponents. Two skill levels. 

Order Today 

Blister Ball and Mad Bomber are available 
together for $24.95 on disk (DOS 3.2) only 
and require a 48K Apple with paddle 
controls. (We recommend using the Super 
Paddles from Peripherals Plus). 

To order send $24.95 plus $2.00 shipping 
and handling to the address below. Credit 
card customers should include card number 
and expiration date of Visa, MasterCard or 
American Express card. Credit card orders 
may also be called in to our toll-free number 
in the continental U.S. 

If you also wish to order a set of Super 
Paddles from our Peripherals Plus subsidiary, 
the cost is just $39.95. The paddles are 
backed by a 90-day limited warranty from 
the manufacturer as well as Peripherals 
Plus' moneyback guarantee of satisfac- 
tion. 

Blister Ball and Mad Bomber are colorful, 
challenging, fast and noisy. They are the 
games of the year from Sensational Soft- 
ware. 

creative 
computing 

Attn: Gladys 
39 E. Hanover Avenue 
Morris Plains, NJ 07950 
Toll-free 800431-8112 

In NJ 201-540-0445 
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PROGRAMMER 



PROGRAMMER is a newsletter 
that offers tips on software 
technique and invaluable 
marketing information. 



You'll learn who 
is selling 
software and 
who isn't. 

What markets 

are hot and what 

markets are dead. 

Industry features keep you informed 

about your rights as a freelancer. 






Don't be without it! 

SEND CHECK OR MONEY ORDER TO: 



PROGRAMMER 
P.O. BOX 3210 
MANCHESTER, N.H. 03105 



NAME- 

ADDRESS:. 

( rrv 



STATE: ZIP 

□ CHECK BOX FOR SAMPLE 1SSUE-S2.00 



OSI *N 

LeMans 



OS| 



FAST ACTION MACHINE CODE RACING FROM DAVE EDJON, IHE WIZARD Of h'M>2! 
YOUR 'CHALLENGER* IS THE FASTEST CAR ON THE TRACK, BUT CATCHING AND 
PASSING SLOWER CARS CAN BE HAZARDOUS TO TOUR HEALTH! SEE HOW FAR YOU 
CAN GO ON ONE TANK OF FUEL WHILE TWISTING AND DODGING THROUGH THE 
PACK. "CI CASSETTE ONLY" OF COURSE IT'S GOT SOUND! - IT'S FROM 
PRETZELLAND ISN'T IT? 8K REQUIRED J9.95 

S_ _ _ e___x_ Youft STAB SECTOR IS UNDER ATTACK! 1 
TAR SECTOR WHILE YOUR SHIELDS HOLD OUT."-^V I, 
Drrr.irr ••• YOU'VE COT TO REPEL THE - =%*' 
EFEIUSE ••* ENEMY SPACECRAFT! AS YOU 
ROTATE AND THRUST YOUR 
SHIP. YOU CAN USE THE BLACK HOLE IN THE CENTER IOC 
HYPERSPACE OUT OF DANGER. BUT THEN AGAIN, YOU 
MIGHT RE-ENTER INTO EVEN BIGGER TROUBLE! AS AN 
ADDED BONUS. SSD HAS A "TWO PLAYER" OPTION) YOU 
AND A FRIEND CAN HAVE A "SPACE WAR" AFTER YOU 
PRACTICE AGAINST THE COMPUTER! COLOR A SOUND, 
8K CASSETTE. SPECIFY YOUR SYSTEM! »9.95 



•/N 



\— (■o 




ON PATROL IN YOUR GALACTIC 



''^WD/ ft -"iATi, AHUUli i 

/> N >«/ (£/"> UR DEFENSES AND 
i ll /' .\ ^ HOME PLA.NET! IF YOU 
1 , »\»V ENEMY WILL SEND ANOT 



Fighter 



SJ '»X_-j / FIGHTER, YOU ENCOUNTER WAVE 

^ fc '<«.~3^' J AFTER WAVE OF ALIEN ATTACK 
•-RAFT, TRYING TO PENETRATE 
ATTACK YOJR 
YOU LET ANY SHIPS SLIP PAST YOU, THE 
ANOTHER SQUADRON OF THE SAME TYPE OP 
SHIP. AFTER EACH ATTACK WAVE. A SPACE TANKER WILL TRY 
TO RENDEZVOUS AND REFUEL YOUR FIGHTER. EACH SQUADRON IS 
WORTH MORE POINTS. BUT EACH ATTACK WAVE HAS MORE SHIPS! 
HOW LONG CAN YOU HOLD OUT? COLOR !c SOUND. BK CASSETTe. 

Introductory "■"""* ""-" , 

**4 4__ , EXPIRES ™ 2 °" MORE OF THESE NEW SOFT PRETZELS 

VjIIWl • 2/i5/82 AND TAKE * *>-°° DISCOUNT ON EACH ONE! 




OR, SEND 11.00 POR A PHOTO-ILLUSTRATED 
CATALOG AND GET A *1.50 CREDIT GOOD ON 
YOUR FIRST ORDER! 

ALL PROGRAMS AVAILABLE ON CASSETTE ONLY! 

Pietzelland Software 

2005 O WHITTAKER RD. 
YPSIL ANTI, Ml. 48197 
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EDITRIX + GRAPHTRIX = THE MOST POWERFUL WORD PROCESSOR 
THIS SIDE OF A NEWSPAPER COMPOSITION ROOM 



EDITRIX,- 
TEXT EDITOR 

EASY TO USE 

• Friendly. COMPLETE Instructions that you or your 
your secretary can understand. 

• Easy to remember 1 or 2 keystroke commands. 

• Fully Menu Driven. 
POWERFUL 

• Full Cursor Control. 

• Full Print Size and Emphasis Control. 

• Underline - Superscript - Footnotes. 

• Search - Replace - Block Move. 

• Automatic Graphic Insertion and Formatting. 

• All Justify Modes and Full Margin Control 

FLEXIBLE 

• 40 or 80 Column Display. 

• Printout through GRAPHTRIX to 11 different 
Printers WITHOUT CHANGING YOUR TEXT FILE' 

REQUIRES: Apple II with 48K. Applesoft in ROM. DOS 
3.3 and the GRAPHTRIX Matrics Graphics System 



GRAPHTRIX™ 
TEXT PRINTER AND GRAPHICS SCREEN DUMP 

EASY TO USE 

• Complete READABLE documentation. 

• Fully Menu Driven. 

• Self-running Introduction and Demonstration. 

POWERFUL 

• Graphic Magnification. Normal/Inverse. Page Centering, 
Hi and Low Crop Marks, Title String. 5 

• Automatic Formatting of Graphics in your Document. 

• Print Size, Emphasis. Underline. Superscript. Footnotes. Chapters, 
controlled from your text file. 

FLEXIBLE 

• Prints ANY HI-RES Graphic your Apple II can create. 

• Formats Text files from Applewriter OR EDITRIX. 

• Use as a Menu Driven Screen Dump OR from in YOUR OWN 
Applesoft Program. 

• Compatible with 11 different Matrix Line Printers AND 7 different 
Parallel Interface Cards. 

REQUIRES: Apple°ll with 48K. Applesoft in ROM. DOS 3.3 and one of the 
following line printers: EPSON MX-70/MX-80/MX-100. ANADEX 
9500/9501. IDS 440G/445G/460G/560G, CENTRONICS 739, MPI 88G. 
SILENTYPE. 



FROM DATA TRANSFORMS. INC., THE GRAPHICS LEADER 



EDITRIX and GRAPHTRIX aro Ihc tfaden- 
Apple tl and Appl 



. CO 80218 (303) 722-8774 
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UNIQUE PROGRAMS 

FOR 

THE APPLE II* 



Presents I9t0C"GD"!@0C 11 By Stanley M. Dratler, M.D. 

The original Disc-O-Doc has been hailed by educators and programmers alike as the only disk utility program of its kind lor 
the APPLE II Now. il is even belier and more powerlul as Disc-O-Doc II. With it you will be able to read any diskette - copyable 
or not. repair crashed diskettes, change D.O.S commands at will and even undelete programs deleted by mistake. 

Disc-O-Doc II will save you many hours ol work on dies that have been ruined, and programs thai need to be modified You 
can now see how diskettes were created to be uncopyable and even learn how to do it yourself. Finally, the secrets of D.O.S 
will be secrets no more. Along with the extensive documentation included you will be able to learn many facets of the workings 
of D.O.S. Easy to use. loo powerful not to! 

And now Disc-O-Doc II contains many unique new features. 

• HALF-TRACKING — now you can even read those diskettes that are half-tracked. Track 1.5. 2 5. etc. 

• PRINTER OUTPUT — send all of Ihe information you find out to any standard printer card 

• SELF DIAGNOSIS — tells you instantly what part of DOS has been changed on any disk lo make it uncopyable 

• AUTO TREATMENT — just tell Disc-O-Doc II what to do and it will change D.O.S in all the right places. 

• SINGLE SECTOR OR WHOLE TRACK — your choice read or write all or part only 

Disc-O-Doc II is supplied on a write protected 
diskette with complete bound documentation for only 



$99.95 



Word Processor II 



This is a text editor thai outperforms any other on the market. Compare it to any word processor and you'll buy 
Word Processor II without a doubt. Just check the review in Oct. 1981 Call-A.P.P.L.E. 

• Form Letters - makes individual letlers that seem to be personalized with up to 255 different fields 

• Text Files - works with any standard sequential text file including most 6502 assemblers. 

• Conditional Text - checks for a cerlain condition and inserts necessary texl completely formatted 

• Speed - ultra fast loading and saving of texl Puis formatter into any 16K card for instant printing 

• Compatability - works with most 80 column cards wlhout any modifications DOS 3 3 or 3 2 

• True Upper/Lower Case - bolh on the screen wilh adaptors and m the file 

• Economy - compare the price and you'll be convinced 



WP II only $75.00 



Lowercase Rom for Rev 7. 



$45.00 



Introducing 









By Ray Balbes, Ph.D. 



Enhance any stereo or cassette recording with a fantastic, fully SYNCHRONIZED HI-RES light show. Use basic 
designs of your own creation - or use those supplied - to enjoy an unlimited number of visual images with the 
sound. The images are controlled by the sound frequencies in real time. 

* Kaleidoscope light shows * Guitar player who sings S plays to the beat * Geometric design light shows 

* Fast machine language programs are used lo synchronize audio & visual * Take your own EKG 

* 23 page, clearly wriiten manual tells: 

• How to create new light shows * Watch your voice on the oscilloscope' 

• How to add light shows to your own programs * Powerful design/editor for creating light shows 

* Introductory price $24.95 
For any 48K Apple II or II t with Applesoft S a disk drive (DOS 3 2 or 3 3) No hardware modifications 






VISA 



FOR CHARGE OR 
COD. ORDERS 
CALL TOLL-FREE 



800-227-1 61 7 £ 372 



EXT. 



OTHER CALLS 

AND INFORMATION 

314-725-1110 



IN CALIF. — 800-772-3545 
Add $2 postage & handling for each program ordered. Foreign orders add $7 for AIR MAIL POSTAGE 

7225 CLAYTON ROAD, ST. LOUIS, MISSOURI 63117 

'Apple il is .1 ieg>ste<e<J trademark of Apple Computet mc 
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Stewart, C.A., "OSI C1P Control Functions," pg. 
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A method to implement commands (RUN, LOAD, 

SAVE, LIST, etc.) by a single keystroke. 
Mason, fames L., "Double the Cassette Baud Rate of 
Your OSI Superboard 11/ IP," pg. 114-115. 

A hardware modification for the Superboard. 
Butterfield, Jim, "Relative File Mechanics," pg. 
122-124. 

An instructional article on relative files for the PET. 

Hinrichs, William L., "Matrix Row Operations," pg. 
56-63. 

A mathematics classroom teaching aid (Apple/PET) 

including a program in BASIC. 
Dejong, Marvin L., "A Floating Point Binary to BCD 
Routine," pg. 66-73. 

Machine language routines for 6502 micros. 
Harvey, Francis A. and Collins, Rosann W. and Hines, 
Theodore C, "Fill the Screen with Your Message," pg. 
80-86. 

Generating large multi-colored characters using Apple 

low-resolution graphics. 
Kelly, Derek, "Decrementing the FOR... NEXT and 
Endless Loops," pg. 88-90. 

An instructional article for Applesoft users. 
Stewart, Ed., "Unleash the Power of Your Atari CPU," 
pg. 102. 

How to get a 30% increase in speed from your Atari 

CPU. 
Brannon, Charles, "String Arrays in Atari BASIC," pg. 
103-104. 

A method to simulate string array handling in Atari 

BASIC. 
Butterfield, Jim, "Working with BASIC 4.0," pg. 136. 

Tips on getting printed output from the machine 

language monitor in PET's BASIC 4.0. 
Butterfield, Jim, "Disabling the STOP Key," pg. 141. 

How to disable the PET's STOP key. 
Turco, Francis, "Dissecting C.W. Moser's ASSM/TED 
1.0," pg. 142-144. 

Assistance for the user of this PET utility. 

Deal, Elizabeth, "How to Get Started in Machine 
Code," pg. 146-151. 

For PET users taking their first steps in machine code. 
Herman, Harvey B., "KIM Tidbits," pg. 163-164. 

Expanding the KIM system. 
Olivo, Richard F., "Printing a Symbol Table for the AIM 
65 Assembler," pg. 165. 

Assistance for AIM 65 users. 
1154. Interface Age 6, Issue 5 (May, 1981) 

Baker Al, "Game Corner," pg. 27-29. 
An Apple program for measuring the readability (Fog 
Index) of plain text. 



1155. Peelings II 2, No. 2 (March/ April, 1981) 

Staff, "Apple Software Evaluation," pg. 5-44. 

Reviews of 11 educational programs, 4 communica- 
tions packages, 3 utilities and several miscellaneous 
programs. 

1156. OSI User's Independent Newsletter, No. 9 
(April, 1981) 

Anon., "Printer Driver," pg. 6. 

Source code for a driver for a serial EMAKO printer 

and CA-10X card. 
Anon., "PEEK and POKE," pg. 7-8. 

PEEK and POKE for Pascal on the OSI systems. 



1157. Nibble 2, No. 2 (April, 1981) 

Thompson, C.J., "Applesoft NIFFUM," pg. 49-53. 

NIFFUM.FP for the Apple will transfer Applesoft files 

from DOS 3.3 to 3.2 diskettes. 
Mottola, R.M., "Inputting Strings with Commas," pg. 57. 

A utility for the Apple. 
Black, Preston R., "Disk Snooping — Part 1," pg. 63-70. 

The first of a series on disk utilities for the Apple disk. 
Thompson, C.J., 'BSAVE Can be Easy," pg. 71. 

How to figure out the A$ and L$ parameters for binary 

saves on the Apple. 
Reynolds, William IH, "Using Text Files from Machine 
Language, pg. 71-74. 

Tips on using Apple text files. 
Chipchase, Frank D., "Chaining Applesoft Without a 
Chain," pg. 77. 

A technique for Apple programmers. 

1158. Recreational Computing 9, No. 6, Issue 51 
(May/June, 1981) 

Thornburg, David D., "Pilot's Turtle Graphics for 
Atari," pg. 16-20. 

Atari Pilot offers a simple way to develop graphics on 

the Atari. 

1159. Spreadsheet 1, Issue 3 (March, 1981) 

Barker, Thomas, "Visitip #7," pg. 1. 

How to set up a label to your worksheet on the prompt 

line, on VisiCalc. 
Bostater, John, "Introducing a Bit of Logic into a 
Model," pg. 5. 

Here is an algorithm for VisiCalc to match numbers, 

with an example of sorting out information by a code 

number. 

1160. POKE-Apple 3, No. 3 (April, 1981) 

Holderby, Michael and Hamilton, Al, "Integer BASIC 
Token Scheme," pg. 10-14. 

An instructional article on Apple's use of tokens. 
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6502 



FORTH 



adheres to the FORTH-79 STANDARD 
performs FLOATING POINT MATH 
contains a 6502 MACRO ASSEMBLER 
handles STRINGS much like BASIC 
includes VIRTUAL MEMORY MANAGER 
is ROMABLE 
costs under S100 

is available for KIM-1. AIM 65 and SYM-1 
manual has extensive FORTH TUTORIAL 



For more information and an ordering form 

contact: Eric C. Rehnke 

1067 Jadestone Lane 
Corona, CA 91720 
(714) 371-4548 



OSI Disk Users 

Double your disk storage capacity 
Without adding disk drives 

Now you can more than double your usable floppy 
disk storage capacity — for a fraction of the cost 
of additional disk drives. Modular Systems' 
DiskDoubler™ is a double-density adapter that 
doubles the storage capacity of each disk track. 
The DiskDoubler plugs directly into an OSI disk 
interface board. No changes to hardware or 
software are required. 

The DiskDoubler increases free user disk space 
from 50K to 120K for mini-floppies, from 201 K to 
420K for 8-inch floppies. With the DiskDoubler, 
each drive does the work of two. You can have 
more and larger programs, related files, and disk 
utilities on the same disk — for easier operation 
without constant disk changes. 

Your OSI system is an investment in computing 
power. Get the full value from the disk hardware 
and software that you already own. Just write to 
us, and we'll send you the full story on the 
DiskDoubler, along with the rest of our growing 
family of OSI-compatible products. 

™ DiskDoubler is a trademark of Modular Systems 

Modular Systems 

P.O. BoxIGA Oradell, NJ 07B49 
201-262-0093 



1161. Mini'App'Les 4, No. 4 (April, 1981) 

Anon., "Driver Demo," pg. 9. 

A BASIC driver demo program to send block graphics 

to an Epson MX-80 with modified Apple Epson board. 
Anon., "Dan On Printers," pg. 13. 

Some tips on using the Epson MX-80. 
Murrell, Mike, "Addendum to Dan on Printers," pg. 13. 

Notes on using the SSS AIO board with the MX-80. 
Thiesfeld, Chuck, "Chuck on Printers," pg. 14-16. 

How to modify the Epson Apple interface board so 

your MX-80 can print block graphics. 

1162. Apple-Can 1, No. 1 (December, 1980) 

Radford, Bob, "Pascal with One Drive," pg. 15-16. 
How to improve the one-drive system by breaking up 
the Apple/ Pascal system programs among a number of 
disks according to the use that is made of each disk. 



1163. Apple-Can 1, No. 2 (February, 1981) 

Falkner, Keith, "The Truth of Magnetism," pg. 17-18. 
An interesting article dispelling some of the myths 
about tapes or disks being excessively sensitive to 
magnetic fields. It takes a very substantial field 
strength to cause loss of data! 

Pugh, John, "Soft Copy to Screen," pg. 24. 
A utility for users of the Magic Window word process- 
ing system. 

Hurd, John C, "The Sorcerer: A Program for Converting 

Machine Code to Source Text," pg. 28-32. 
A utility for the user of Apple assembly language. 



1164. Apple-Can 1, No. 3 (April, 1981) 

Wojdylo, Tomasz, "Apple Repair Tips," pg. 14. 
Some tips on what to look for when your disk drive 
gives up and issues a burnt plastic odor! 
Vella-Zarb, Pierre, "Sorcerer Extension: A Cheap Dis- 
assembler," pg. 23-28. 
A utility for the Apple. 

1165. Atari Computer Enthusiasts 2, Issue 4 (April, 1981) 

Goff, Stacy A., "Fileindx — Part Two," pg. 10-11. 
A utility to allow you to index your disks and direc- 
tories, for the Atari. 

1166. Apple Assembly Line 1, Issue 7 (April, 1981) 

Sander-Cederlof, Bob, "Text File in Assembly Language 
Programs," pg. 2-4. 

How to read or write a text file from your Apple 

assembly language program. 
Sander-Cederlof, Bob, "Applesoft Entry Points," pg. 4-5. 

A useful table for Apple programmers. 
Sander-Cederlof, Bob, "Commented Listings of DOS 
3.2.1 and #.# Formats," pg. 11-17. 

The Format routines of the two DOS for the Apple 

disks are disassembled and explained. 

1167. The Apple-Dillo (April, 1981) 

Sethre, Tom, "Program Utility Printer." 
This program assists you in printing listings of pro- 
grams in a wider format than appears on your screen 
— for the Apple. 
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1168. Electronics 54, No. 6 (March 24, 1981) 

Wyatt, Michael A., "Laplace Transform for the Apple," 
pg. 163. 
A time domain display of a Laplace transform. 

1169. The G.R.A.P.E. Vine 2, No. 3 (April, 1981) 

Lawson, Steve, "13- and 16-Sector DOS," pg. 5. 

How to cope with 13- and 16-sector disks using 
several approaches. 



1170. Dr. Dobb's Journal 6, No. 55, Issue 5 (May, 1981) 

Pittman, Tom, "Analysis of an Analysis," pg. 4. 
Discussion of 6502 opcodes. 



1171. The Apple Barrel 4, No. 2 (April, 1981) 

Gilbreth, Lee, "Son of a ... File Cabinet," pg. 5-6. 
A round-up of modifications for the popular Apple 
utility, File Cabinet. 

1172. PEEK(65) 2, No. 4 (April, 1981) 

Williams, Jim, "Two Dollar BSR X-10 Interface," pg. 5-6. 
Hardware and software for a wireless AC remote con- 
trol system. 

Loos, James, "C1P as a Dumb Terminal," pg. 6-8. 
Machine language routine for OSI systems such as C1P. 

Jones, David A., "Cassette Corner," pg. 8, 21-22. 
Notes on saving machine language code on OSI 
systems. 

1173. F.W.A.U.G. Newsletter 2, No. 4 (February, 1981) 

Meador, Lee, "Disassembly of DOS 3.2," pg. 2-6. 
A continuation of this popular series. 



1174. T.A.R.T. Newsletter 2, Issue 2 (April, 1981) 

Sand, Paul A. and Koerin, Sid, "Pretty Listing," pg. 22-29. 
A program to modify your program listings to refor- 
mat into a more readable form. 

1175. The Apple Orchard 2, No. 1 (Spring, 1981) 

Wciglin, Peter C, "Screen Formatting of Text," pg. 9-14. 

An instructional article for Apple owners. 
Good, R.H., "Practical Super Hi-Res Graphics," pg. 20. 

Plot on the Apple with a resolution of 560 x 192. 

Reynolds, Lee, "S.H. Lam Routine Utility," pg. 28-29. 

A routine to set up machine language routines within 

a BASIC program on the Apple. 
Nareff, Max J., "Matrix Functions with the Apple," pg. 
36-38. 

How to reconstruct those matrix functions missing 

from Applesoft. 
Mack, Art, "Sorting in BASIC," pg. 68. 

A simple sort routine for Apple. 
Golding, Val J., "Proper Printer Protocol," pg. 91. 

A suggested standard BASIC printer call subroutine. 

1176. Abacus II 3, Issue 3 (March, 1981) 

Howard, Clifton M., "Directory Title Formatting," pg. 

5-24. 
A concept of directory title formatting including a 
series of utilities for disk management for the Apple. 




6502 COOKBOOK 
For the machine language 
programmer who knows it 
is time to get serious! Here 
are search and sort rou- 
tines, utilities, I/O & inter- 
rupt procedures, conver- 
sion routines, stack opera- 
tions. Contains flow charts, 
source listings, explana- 
tions. Machine codes pro- 
vided in both octal and 
hexadecimal. Tens of thou- 
sands of our programmer's 
cookbooks are in use. 



Order publication: 6502 SOFTWARE COOKBOOK 
Price in United States: just $12.95 + $1.00 s/h by mail. 

Please include remittance with order. Allow 3 - 4 weeks 
for delivery. MasterCard & VISA credit cards accepted. 
Our phone line for credit card orders is (203) 888-1946. 
Foreign price list available. Write for more information. 

D Check here for descriptive literature & catalog. 
Name: 



Addr: 


City: 


State: 


Zip: 


MC/VISA # 




Bank: 









SCELBI Publications 

35 Old State Road, Oxford, CT 06483 



Ohio SciENTific 

^k At Last! 

eap 



Extended Arithmetic 
Processor 

Copyright North East Financial Systems 9/81 



MULTIPLE PRECISION MATH 
65D3 and 65U 

13-Digit Input — 26-Digit Output 

Complete Rounding Function 

Completely Integrated into 9-digit 
MICROSOFT BASIC 

$95.00 End User License — 8" Disk, 

39-page Manual 

OEM and Distributor License — Inquire 

NoRTh East FInanciaI Systems 

16 Maple Avenue 

West Nyack, New York 10994 

(914) 358-2898 
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What is VersaWriter? 

VersaWriter is an inexpensive drawing 
tablet for the APPLE II that lets you 
trace a picture and have it appear on 
TV display. 



VersaWriter is a comprehensive 
software drawing package which lets 
you color in drawings with over 100 
different colors. 

VersaWriter is a shape compiler that 
converts anything on the screen 
automatically into a standard shape 
table. 

VersaWriter is a text writer for labeling 
pictures with text in six colors and 
five sizes. Use English or Greek, 
upper or lower case letters. 



VersaWriter is much more! Draw with 
brush, create schematic drawings, 
compute area and distance, edit pic- 
tures, save, recall and more. 

VersaWriter requires ROM APPLESOFT 

and 48K memory. 

$299 Suggested Retail 

UNIQUE OFFER 

Send us YOUR disk and $1 . We will promptly 

return the disk with a slide package of 10 

color pictures drawn with VersaWriter. 





• * l»i **. 2/D „Q 

9 + »6' 2>- 282> 

l»- 1? M 24^ 290 34T| 

13 . "JL ; 32? 35 c 



4 1T^ 2,vV 2 (£> 



>33' 



□ Enclosed is $1 and my disk. 
Send me the slide package. 

□ Send more information including 
VersaWriter dealers in my area. 

DEALER INQUIRIES INVITED. 



ADDRLSS 



STATE 



ZIP 



Send To: Versa Computing, Inc. • 887 Conestoga Circle • Newbury Park, CA 91320 • (805) 498-1956 
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A feast 9 
of computing ideas. 



ONE 



°^er before l n SCf ' ber ^- 






If you work with a 6502/6809-based 
system, you're probably hungry tor the 
facts and ideas that will help you 
understand the inner workings of your 
computer. You want to go beyond 
canned software — use your computer 
for more than games — learn the 
advanced programming techniques 
that enable you to get the most out of 
your 6502/6809 system. 

MICRO, The 6502/6809 Journal, 
gives you page after page, month after 
month, of solid information to sink 
your teeth into. MICRO is the premier 
how-to magazine for serious users of 
the Apple, PET/CBM, OSI, Atari, AIM, 
SYM, KIM, and all 6809 based systems 
including the TRS-80 Color Computer. 
It's a resource journal internationally 
respected by professionals in business, 
industry, and education. Every issue of 
MICRO keeps you informed with up-to- 
the-minute data on new products 
and publications: 

• hardware catalog with organized, 
concise description 

• software catalog in an easy-to- 
use format 

• new publications listed and 
annotated 

• reviews and evaluations of sig- 
nificant products 

And there's much more: 

• In-depth hardware tutorials 
bring expert advice into your home or 
office. 

• Detailed discussions of pro- 
gramming languages deepen and 
broaden your programming ability. 

• Complete program listings 
enable you to increase your machine's 
capabilities. 

• Bibliography of 6502/6809 
information helps you to find pertinent 
articles in a timely manner. 

• Special monthly features with 
in-depth treatment of one subject or 



OCTOBER 18C1 



/AlCftO 

THE 65 02/6609 JOURNAL 




A Look it tho TRS-80 Color Compuiar 

Slip Up to Programmabl e Motion 

A to Conwrfni lor You r Compirtif 



You'll love 
every byte. 



YES! I want to get more from 
my microcomputer. Please send me 

year(s)ofMICROatS_ /year. 
(Outside U.S. and Canada, please 
indicate via □ surface or □ air mail.) 



Company 

■::■.■■ I 

City State Zip Code 

□ Check enclosed for S 

□ Charge my credit card account 
D VISA □ MasterCard 

Signature ^ ^M 

LCard numoei g 



system increase your knowledge of the 
field. 

• Balanced mix of machine- 
specific and general articles for your 
everyday use as well as long-range 
reference needs. 

• Informative advertising 
focused specifically on 6502/6809 
machines keeps you abreast of latest 
developments. 

• Reader feedback puts you in 
touch with other micro-computerists. 

MICRO is the magazine you need to 
get the most from your own 6502/6809 
system! 

To order, send your check or interna- 
tional money order (payable to MICRO) 
and the order form at left, to: 

Subscription Fulfillment 

MICRO, Dept. Ml 

34 Chelmsford Street 

P.O. Box 6502 

Chelmsford, MA 01824 

Or, for your convenience, call our 
toll-free number: 

1 -800-227-1 61 7, Ext. 564 

(In California, 800-772-3545, Ext. 564) 
and charge your subscription to your 
MasterCard or VISA. (All orders must be 
prepaid in U.S. dollars or charged to 
your MasterCard or VISA.) 

SUBSCRIPTION RATES (U.S. dollars) 
Yearly subscription (ISSN 027-9002) 
saves 20% off the single-issue price. 
U.S. $24* 
Canada $27 

Europe $27 ($42 by air mail) 
Mexico, Central America, Mideast, 
North and Central Africa $27 ($48 air) 
South America, Far East, South Africa, 
Australasia $27 ($72 air) 
♦SPECIAL OFFER— U.S. ONLY: 
Save even more — 30% off single-issue 
price: 2 years, $42 




BETA 32K BYTE EXPANDABLE RAM FOR 

6502 AND 6800 SYSTEMS 

AIM 65 KIM SYM PET S44-BUS 

• Plug compatible with the AIM-65/SYM expan- 
sion connector by using a right angle connec- 
tor (supplied). 

• Memorv board edge connector plugs into the 
6800 S44 bus. 

• Connects to PET using an adaptor cable. 

• Uses +5V only, supplied from the host com- 
puter. 

• Full documentation. Assembled and tested 
boards are guaranteed for one full year. 
Purchase price is fully refundable if board is 
returned undamaged within 14 davs. 

Assembled with 32K RAM '... .$349.00 

& Tested with 16K RAM 329.00 

Bare board, manual & hard-to-get parts.., 99.00 
PET interface kit. Connects the 32K RAM board 
toa4Kor8KPET $ 69.00 

See our full-page ad in 
B YTE and INTERFA CE A GE 



wabasH 




8" or $W M flexible diskettes certified 100^o error 
free with manufacturer's 5-year limited warranty 
on all 8" media. Soft-sectored in boxes of 10. 
$'/*" available in 10-scctor. 
(Add $3.00 for plastic library catex) 

8" single sided, single densit\ ? 27.50 

K" 'linule sided, double densitj, 35.50 

8" double sided, double density 45.50 

5'V single sided, single densit) 27.50 

5 1 4" single sided, double density.... 29.50 

5 l A "single sided, double density. 10-sector S 29.50 



PAPER TIGER 
PRINTERS 

IDS460G9x9 Dot Matrix Printer S890.00 

IDS 560G Wide Carriage Printer 1099.00 

TERMINALS 

ADDS Viewpoint S5M 00 

TckVidco 910 579.00 

lelcVideu 9I2C 679 00 

1 clc Video 920C 729.00 

TeleVidco 950 929.00 

8" DISK DRIVES 

Shugart 80IR S399.00 

NEC FDII60 (double sided) 569 00 

DYNAMIC RAMS 

41 16 1200ns) set of 8 S24.00 

4164 (MKxl) SIK.00 



TERMS: Minimum order $15.00. Minimum ship- 
ping and handling S3. 00. Calif, residents add 6% 
sales tax. Cash, checks. Mastercard, Visa and pur- 
chase orders from qualified firms are accepted. 
(Please allow two weeks for personal checks to 
clear before shipment.) Product availability and 
pricing subject to change without notice. 
INTERNATIONAL ORDERS: Add 15 « /,, ;.nr- 
chase price for all tirdcr\. Minimum shipping 
charge is $20.01). Orders with insufficient fundi 
will he delayed Excess funds will he returned 
U tin your order. All prices are U.S. only. 



compuTER Devices 

1930 W.COUin* AVE. 

ORAAGE. CA 99668 

(714)633-7980 




Double Density HCK 





cosmos 

screen my 

MIXER 

SCREEN MIXER is a set of three modules for APPLE-II. 
Just plug-in these modules to your Apple-II, and you will 
have the Apple -II with more features you could not expect 
till now 

SCREEN MIXER provides: 

•The mixed screen of any two of screens available for the 
Apple-II. Please note that all of HGR, LGR and Text screen 
has two pages. The mixing is done with hardware, not like 
Hi-Res Text Generater Programs, thus you need no software 
and the scroll speed is not reduced. Also, you can scroll 
the text without any effect to the graphic patterns. 

• The Double Density High Resolution Graphics. Yes, you 
can plot 580 dots in one line. You have only 280 dots in one 
line on ordinary Apple-II, (Software is required) 

• One of the most advanced character display. Besides 
Normal and Inverse characters which are already built-in 
you will have the choice of Half-Intensity and Hilighted cha- 
racters. And more, you may Over-Write or Over-Type any 
character to other character if you want to do so! 

(Software is included) 




$60 lntroductor v P^ice 

Offer ends Apr., 31, '81 

cosmos 



S50 



Highlight 



NORMAL 

HALF 
INTENSITY 



Half Intensity 




Over Write 



mo widi comrvim iurm iHor 



Dealers inquiries invited. 

For more information call or write to ASTAR INTERNATIONAL CO. 

5676 FRANCIS AVE., CHINO, CA 91710 Phone 714-627-9887 

Apple-II is a registered trademark of Apple Computer Inc. 




Software Catalog 



Name: Real-time Clock 

Software 

System: KIM-1 

Memory: IK 

Language: 6502 Machine Language 

Hardware: CMOS Real-time Clock 

Chip MSM5832RS 
Description: Real-time Clock Software 
for KIM-1 occupies %K bytes plus 
pointers in zero page. 70-page manual 
includes detailed assembler listing, 
machine language dump and extensive 
documentation. User-friendly system 
prompts for time-settings of year, 
month, day, hour, minute, and seconds 
in a 24-hour format. Major subroutines 
include Read Clock, Display Time, and 
Write Timesetting to Clock. All sub- 
routines are well-documented for easy 
modification. Manual also documents 
Real-time Clock circuitry required for 
easy construction and interconnection 
to KIM-1. 

Price: $10.00 for Real-time 

Clock Software/ 
Hardware Manual. $1.00 
for specifications/notes. 
Author: Hunter Technical Services 

Available: Hunter Technical Services 
P.O. Box 359 
Elm Grove, WI 53122 



Name. TWGI Arima 

System: Apple II, Apple II Plus 
Memory: 48K 
Language: Applesoft 
Hardware: 1 disk (printer and 2nd 

disk recommended) 
Description: Box Jenkins package does 
seasonal and non-seasonal models. 
Menu-driven package does identifica- 
tion, estimation, diagnosis and fore- 
casting. Includes programs to create, 
correct and update data; left- and right- 
hand software keypads. Also program 
to do all BASIC transformations. 



Price: 



Author: 
Available: 



$250.00 includes 
program, test data and 
results, 60-page manual 
Eric Weiss, Ph.D. 
The Winchendon Group 
P.O. Box 10114 
Alexandria, VA 22310 



Name: Lesson-tutorgraph™ — 

Shore Features and 
Weather 

System: Apple II, Apple II Plus 
with Applesoft in ROM 
or Language System 
Memory: 48K, DOS 3.3 
Language: BASIC 
Hardware: Apple II or Apple II Plus, 

1 disk 
Description: Programmed presentation of 
lesson material with branching, re- 
view, full color, Hi-Res illustrations, 
and tests. "Weather Fronts" includes 
front characteristics, frontal move- 
ment, and weather characteristics of 
different fronts. "Shore Features" 
teaches about beach/shore, berm, 
dunes, low/high tides. 
Price: $24.95 includes diskette, 

manual with objectives, 
options, suggestions for 
use 
Author: Patrick C. Moyer and 

Lois B. Bennett 
Available: Teach Yourself By 
Computer (TYC) 
Software™ 
40 Stuyvesant Manor 
Geneseo, NY 14454 



Name: 
System: 



Memory: 

Language: 

Hardware: 



RPL Compiler 

All Commodore PET and 
CBM-series machines 
8K minimum 
No additional 
No additional 
Description: RPL (Reverse Polish 
Language) is a new language designed 
to compete with FORTH. RPL object 
code runs faster and takes up less 
memory space than FORTH object 
code. RPL is also much easier to use 
than FORTH, although it is just as 
powerful. 

$49.95 and down 
includes RPL compiler 
on disk or cassette and 
detailed user's manual 
Tim Stryker 
Samurai Software 
P.O. Box 2902 
Pompano Beach, FL 
33062 



Price: 



Author: 
Available: 



System: 
Memory: 
Language: 
Hardware: 



Name: EIS General Accounting 

Package 

OS65U 

48K 

BASIC 

Ohio Scientific C-2 or 

C-3 series 
Description: This package includes fully 
integrated accounting, payroll, and 
inventory systems written in standard 
accounting terminology and procedure. 
It is end-user oriented, menu-driven, 
and generates all necessary reports and 
summaries. Individual Software Cata- 
log Entry sheets on all three portions 
will follow in the next three months, 
with your one-a-month acceptance plan. 
Price: $3,500.00 total system 

includes program disks, 

data disks, and complete 

manual 
Author: Electronic Information 

Systems, Inc. 
Available: Electronic Information 
Systems, Inc. 

P.O. Box 5893 

Athens, GA 30604 

(404) 353-2858 



tion 






Name: Rubin's Cube 

System: OSI C1P 
Memory: 8K 

Language: 8K BASIC in ROM 
Description: Try to solve this popular 
cube puzzle on your computer. The 
program displays a large three- 
dimensional cube that just fits on the 
24 x 24 screen and uses graphics in 
place of colors. The computer mixes up 
the cube and, through the keyboard, 
you can make any move that can be 
made with the real cube to solve the 
puzzle. The commands are easy to 
learn and only four characters long. 
Price: $5.00 includes cassette 

and documentation 
Author: Brian Zupke 

Available: B.C. Software 

9425 Victoria Drive 

Upper Marlboro, MD 

20772 



Name: Accounts Receivable 

System: Apple II 

Memory: 48K 

Language: Applesoft or Language 

System 
Hardware: Dual 5" drives, any 

130-column printer 
Description: A quality program, struc- 
tured around the Osborne Accounts Re- 
ceivable software, with several added 
enhancements. Can be used alone or 
integrated with General Ledger. 
Features open invoicing, credit and 
debit memos, full or partial payments, 
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Software Catalo g (continued) 

progress billing, invoice aging and print- 
ing of statements. System is available 
on DOS 3.2, DOS 3.3, or 8" drives, if 
additional capacities are required. 
Price: $249.00 

Author: David McFarling 

Available: Small Business Computer 
Systems 
4140 Greenwood 
Lincoln, NE 68504 
(402) 467-1878 






Name: Type 

System: SDOS or SDOS/MT 

Memory: 48K minimum 
Hardware: 6800/6809 CPU with 

CRT, disk and printer 
Description: Type is a document- 
formatting program, used in word pro- 
cessing or document production. Com- 
mands embedded in raw text files pro- 
cessed by Type control the formatting 
of that text on the output device. Out- 
put formatting includes full justifica- 
tion, page width and depth, page num- 
bering, centering, spacing, titles and 
table of contents generation. Type is 
used in conjunction with the SD Screen 
Editor for easy data entry. 
Price: $140.00 includes 

program, 100-page 

manual 
Author: AMS 

Available: Software Dynamics, 
exclusively 

2111 W. Crescent, Su. G. 

Anaheim, CA 92801 

(714) 635-4760 



Name: Fast Facts 

System: Apple II, Apple II Plus 

Memory: 48K 

Language: Applesoft 

Hardware: Disk 3.2 or 3.3, line 

printer desirable 
Description: This selection of programs 
was created and designed by a certified 
financial planner for quick analysis of 
the personal investment planning 
needs of his clients. It was profession- 
ally programmed for efficient and ac- 
curate operation. Fast Facts operates 
easily with single key program selec- 
tion and printing commands. In many 
cases the entire planning sequence is 
completed in less than 60 seconds. 
Specific program objects are divided in- 
to six systematic program fields. They 
are: planning for retirement; college 
financing; diversifying investments; 
results of inflation in devaluing earn- 
ings; costs of borrowing money and 



loan balance at any point in time; in- 
vestment calculations for compound- 
ing and future values. 
Copies: Version 1.1 just released 

Price: $95.00 includes disk and 

instructions 
Author: Monte C. Fremouw 

Available: Richard Lorance CPF 

c/o Richard Lorance and 
Associates, Ltd. 

3336 N. 32nd Street, 

Suite 102 

Phoenix, AZ 85018 



Name: Loan Pack 

System: OSI Challenger 

(C2 or C3) 
Memory: 48K 
Language: BASIC (under either 

OS65-U or 65-D) 
Hardware: Disk drive, CRT, printer 

optional 
Description: Loan Pack is a loan 
analysis package. It computes either 
the interest rate of a loan, the principal 
amount of a loan, the amount of the 
loan payment, or the number of pay- 
ments required to pay a loan, when any 
three of the other variables are known. 
It also calculates the present unpaid 
principal of a loan which is partially 
paid; and calculates and displays (or 
prints) a loan amortization schedule 
showing allocation of payments be- 
tween interest charges and principal 
loan payments, and totals amounts of 
interest paid in each calendar year of 
the loan. Self documenting. 
Price: $5.00 for listing 

$12.00 for 8" disk 

(specify 65-U or 65-D) 
Author: Bob Sullivan 

Available: Professional Computers, 
Incorporated 

10885 Washington Blvd. 

Culver City, CA 90230 

(213) 836-5005 



Name: VIC Software 

System: VIC 20 

Memory: 3K 

Language: BASIC and Machine 

Language 
Description: Arcade games are now 
available for the VIC. Cattle Roundup 
has you round up eight cattle in a maze. 
Artillery lets you exchange fire over a 
mountain. Target is based on the ar- 
cade game Missile Command. 
Price: $9.95 each includes 

cassette and program 
Author: Cliff Dudzik 

Available: Computermat Software 

P.O. Box 1664 

2984 Daytona 

Lake Havasu, AZ 86403 



Name: World and State Capitals 

System: Apple II, Apple II Plus 
Memory: 36K with DOS 3.3 II or 

3.2 II and FP installed 
Language: Applesoft BASIC 
Hardware: DOS 3.2 II or DOS 3.3 II 

with controller card, 

printer option 
Description: Consists of a 100-world 
nation/capital and a 50-U.S. state/ 
capital test. Both tests display a low- 
resolution graphic which animates 
dripping square-dots to fill the shape of 
the capital building. Right, wrong, total 
score points plus a bonus feature trig- 
gers this animation. The program 
features a simple single-key stroke 
answering system (except spelling 
test). This eliminates the standard use 
of the return key. The program was 
designed to eliminate teacher's super- 
vision and encourage student's spelling 
accuracy, knowledge of the U.S. and 
the world. The score results are 
retrievable for teacher's use only (by 
date and name, stored score order se- 
quence). In addition to above, the 
teacher can produce his or her own test, 
using the same features and format for 
up to 100 questions. 
Price: $25.00 for both programs 

with test report and test 

editor/report on a single 

diskette 
Author: American Avicultural Art 

& Science Inc. 
Available: American Avicultural Art 
& Science, Inc. 

3268 Watson Road 

St. Louis, MO 63139 



Name: 


Household Finance 


System: 


Commodore V1C-20 


Memory: 


3.5K User RAM 




(unexpanded VIC) 


Language: 


BASIC 


Hardware: 


Commodore VIC-20 with 



cassette unit 
Description: Four programs to record 
household expenses and income in 16 
categories. Provides monthly and yearly 
totals in tabular and graphic form. 
Handles budgeting, and sums tax- 
deductibles. 
Price: $34.95 includes two 

cassettes containing four 

programs, instruction 

booklet. 
Author: John C. Doering, and 

Paul Zuzelo 
Available: Creative Software 

201 San Antonio Circle 

#270 

Mountain View, CA 

94040 

(415) 948-9595 
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Software Catalog (continued) 

Name: Geomap 

System: Apple II or III (adaptable 

to other systems) 
Memory: 32K 
Language: Machine 
Hardware: One disk, printer and/or 

plotter 
Description: This is a contour mapping 
package with the following features: 
menu driven,- easy to use; choice of 
several map styles; adapts to user's 
printer width; maps are made in strips 
the width of printer or plotter paper (no 
limit to strip length or number of strips 
in single map]; accepts either gridded or 
irregular data; large regions are sub- 
divided into small parcels which can be 
run individually and randomly to form 
a contiguous, integrated whole |which 
minimizes RAM requirements and per- 
mits excessively long runs to be broken 
down into several small runs — an im- 
portant feature for micros); modular 
design; choice of gridding algorithms; 
training available. 
Price: $2,000.00 (Manual alone 

$5.00. Refundable with 

purchase.) 
Author: Mason Christner 

Available: Geosystems, Inc. 

802 E. Grand River 

Williamston, MI 48895 



Name: Egbert RTTY Program 

System: Apple II, Apple II Plus 

Memory: 48K 

Language: Applesoft (ROM) and 

Machine Language 
Hardware: Apple disk with DOS 3.2 

or 3.3 
Description: Transmit and receive RTTY 
without any expensive interface hard- 
ware. The Apple cassette ports connect 
directly to the transmitter/receiver — 
no additional hardware required! The 
Apple generates and decodes the RTTY 
tones. Program capabilities include 60, 
67, 75, and 100 WPM Baudot and 110 
Baud ASCII, unique receiver tuning 
using the Hi-Res graphics, type-ahead- 
buffer, break without dumping the 
type-ahead-buffer, canned messages, 
save received text/pictures to disk, 
automatic C.W.I.D., game port-driven 
push-to-talk, plus more. 



Price: 



Author: 
Available: 



$39.95 (California 
residents add 6% tax) 
includes program disk 
and instruction manual 
G.W. Egbert 
W.H. Nail Co. 
275 Lodgeview Dr. 
Oroville, CA 95965 



Name: 6809 Pascal Compiler 

System: 6809 FLEX™ or 6809 

UniFLEX™ 
Memory: 56K minimum 
Language: Pascal 
Hardware: Any that supports 

standard 6809 FLEX or 

UniFLEX 
Description: Native-code Pascal com- 
piler generates assembly language 
source which is assembled into true 
6809 object code. This results in faster 
program execution speeds than com- 
mon "P-code" interpreters. Supports 
nearly all of the Jensen & Wirth Pascal 
specifications plus additional features. 
Includes both integer and floating point 
math with up to 16.8 digits of accuracy. 
Price: $200.00 for FLEX 

version; $300.00 for 

UniFLEX version. 

Includes user's manual, 

Pascal User Manual &) 

Report by Jensen & 

Wirth, and object code 

on diskette. 
Available: Technical Systems 
Consultants, Inc. 

P.O. Box 2570 

West Lafayette, IN 47906 

(317) 463-2502 

Telex: 276143 



Name: Presidential Campaigns 

System: Ohio Scientific 

Memory: 8K 
Language: BASIC 
Hardware: C2-4P, C2-8P, C-4P, 

C-8P (Polled Keyboard) 
Description: The program gives the 
user the opportunity to vote for every 
U.S. President from 1788 to 1980, and 
advises if his or her candidate won or 
lost, giving the name of the winner and 
his Vice-president. 
Price: $9.95 includes cassette 

Author: John and Mary Neally 

Available: SounDustrial Electronics, 
Incorporated 

4066 Polaris Avenue 

Joshua Tree, CA 92252 

(7141 366-9572 



Name: 


Lightning-Bolt 


System: 


OSI C4PMF 


Memory: 


24K 


Language: 


BASIC 


Hardware: 


One disk drive 



takes up the entire disk. You must 
cross mountains, forests, great plains, 
and oceans to seek your fame and for- 
tune! This game has full color graphics 
as well. 
Price: $29.95 includes 

comprehensive 8-page 

manual 
Author: Steve Brown 

Available: Interesting Software 

15217 Campillos Rd 

La Mirada, CA 90638 



Name: 

System: 

Memory: 



: 



Language: 
Hardware: 



Jabbertalky 
Apple II, TRS-80 
16K TRS-80 cassette, 
32K TRS-80 disk, 48K 
Apple disk 

Applesoft or TRSDOS 
Apple II, TRS-80 (model 
I, level II and model III), 
cassette or disk drive 
Description: A programmable word 
game for one or more players, Jabber- 
talky includes two game features and a 
utility program. "Alphagrammar," an 
anagram game, challenges players to 
unscramble entire grammatically cor- 
rect sentences. In "Cryptogrammar," a 
code breaking game, the player must 
decode sentences in which each letter 
of the alphabet is substituted for by 
another. The utility program lets 
players create their own sentences. 
Jabbertalky has eight skill levels and is 
for ages seven through adult. 
Price: $29.95 includes game 

box, rule book, loading 
instructions and disk or 





cassette 


Available: 


Automated Simulations, 




Inc. 




P.O. Box 4247 




Mountain View, CA 




94040 


Name: 


Painter Power 


System: 


Apple II or Apple II Plus 


Memory: 


48K 


Language: 


Applesoft in ROM 


Hardware: 


Diskll 



Description: The finest D&D adven- 
ture for the OSI computer yet! This 
adventure is so comprehensive that it 



Description: Anyone can create com- 
puter art. Using the beginner or advanced 
mode, children and adults can create 
original art designs then use them, or 
any other saved screen, to prepare slide 
shows and art demonstrations. 
Price: $39.95 

Author: Eric Podietz 

Available: Micro Lab 

2310 Skokie Valley Rd 
Highland Park, IL 60035 



. 
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Get more out of your Apple 

with the MICRO on the Apple series. 



volume 2- 

just released! 

You liked Volume 1 — You'll love 
Volume 2! 

More than 40 new programs on 
diskette to help you get more from your 
Apple: 

• Machine Language Aids 

• I/O Enhancements 

• Runtime Utilities 

• Graphics and Games 

• Hardware and Reference Infor- 
mation 

MICRO'S new book for Apple users 
lets you: 

1. Speed up machine language pro- 
gramming using 5 powerful machine 
language aids. 

2. Add additional editing and 
input/output features at no cost! 

3. Enhance the capabilities of 
Applesoft and Integer BASIC to in- 
clude sorting, print using, and MORE. 

4. Use your high-resolution graph- 
ics to plot graphs and display 
"compressed" pictures. 

5. Add an interesting hardware proj- 
ect to your Apple. 

6. Play the intriguing game "Galacti- 
Cube"— 

And much, much more! 

31 choice articles 

46 tested programs on diskette 

(13 sector DOS 3.2 format) 

Buy MICRO on the Apple 2 at your 
local computer store 

or 
Call 1-800-227-1617, ext 564 TOLL 
FREE (in CA, 1-800-772-3545, ext 
564) and charge it to your Mastercard 
or VISA 

or 
Send check for $24.95 plus $2.00 
surface or $5.00 air shipping to: 

MICRO, Dept MI 

RO. Box 6502 

Chelmsford, MA 01824 

Volume 1 also available at$24.95. To- 
gether MICRO on the Apple 1 & 2 

provide more than 60 programs on 
diskette for less than $1.00 each. No 
need to type in hundreds of lines of code. 



/MCftO 

on the Apple 



Volume 



INCLUDES 
DISKETTE 







Please allow 4-6 weeks for suiface mail delivery. 
Massachusetts residents add 5% sales tax. 
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Hardware Catalog 



Name: Execom 80 

System: CBM/PET 

2001/3000/4000 Series 
Memory: Additional IK 
Language: Operating System 
Hardware: 1 4" x5" and 1 2" x2" 

circuit board with an 

optional 2" x2" circuit 

board 
Description: 80-column expansion that 
allows the user to switch between 80- 
column and 40-column displays, from 
program control, or directly from the 
keyboard. Requires some circuit modi- 
fication to CBM/PET circuit board. 
Price: $275.00 includes all 

necessary hardware and 

ROMS, demo diskette 

(4040 format) 
Available: Execom Corp. 

1901 Polaris Ave. 

Racine, WI 53404 

Name: H1PLOT Plotters 

System: TRS-80, 1/2/3, Atari, 

Apple, PET 
Memory: 16 K 
Language: User's Choice 
Hardware: High-resolution pen 

plotter and interface card 

(if needed) 
Description: H1PLOT Plotters is a very 
high quality alternative. Multiple pen 
colors is an add-on option. Resolution 
is typically 200 points/inch. Several 
different models are available in dif- 
ferent sizes and options. A high-level 
plotting language drives the Z-80-based 
hardware. Software is available. 
Price: $1025 - $2000 

Available: Houston Instruments 

One Houston Square 

Austin, TX 78750 



Name: Analog Peripheral 

Hardware: Any system with RS-232 

port 
Description: Self-contained 8-bit 
analog-to-digital converter. RS-232C 
output line is switch-selectable from 
110 to 9600 baud. For faster data trans- 
fer, there is also a 26-pin parallel out- 
put. Plug-in transducers eliminate need 
for breadboarding transducer circuits. 
Four input channels permit logging of 



several variables at once. Fast conver- 
sion speed of 100 microseconds. One 
BASIC instruction begins data logging. 
Price: $449.00 

Available: Cambridge Development 
Laboratory 
36 Pleasant Street 
Watertown, MA 02172 



Name: Sabrina 

System: SCS-10 

Memory: 10 to 120 megabytes 

Language: Apple 3.3 DOS, CP/M, 

Pascal 1.1, TRS DOS 
Hardware: Winchester disk 

subsystem 
Description: Sabrina is the SCS-10 8" 
Winchester hard disk storage system 
that will interface to over 9 different 
major microcomputers including Apple 
II, TRS-80, S-100, Multibus, and the 
IBM personal computer. 
Price: Starting at $4,995.00 

includes everything 

required to run the hard 

disk to the host 
Available: Santa Clara Systems 

560 Division St. 

Campbell, CA 95008 

(408) 374-6974 



Name: Sun-Flex Touch Pen 

System 

Description: Microprocessor-based, 
stylus-operated, graphic-capable inter- 
face, which enables a CRT operator to 
bypass the keyboard and communicate 
directly with the CPU. Available in 
sizes up to 25". 

Price: $250.00 - $1,000.00 

includes transparent 
screen panel, stylus, 
microprocessor 
Available: Sun-Flex Company, Inc. 
20 Pimentel Court 
Novato, CA 94947 



Name: The Grappler 

System: Apple II, Apple II Plus 
Language: All 

Hardware: Parallel interface board 
for Apple 



Description: The Grappler interface is 
the first universal parallel interface 
card to provide sophisticated on-board 
firmware for Apple high-resolution gra- 
phics. No longer does the user need to 
load clumsy software routines to dump 
screen graphics — it's all in the chip. 
Actually, it's our EPROM, and there 
are versions to accommodate numer- 
ous printers. The Grappler accepts 18 
simple software commands accessible 
through the keyboard or user program, 
making it the most intelligent Apple 
interface available. It is also Pascal- and 
CP/M-compatible. 
Price: Includes 5 ft. cable and 

manual 
Available: Orange Micro 

3150 E. La Palma, Suite I 

Anaheim, CA 92806 

(800) 854-8275 

Waybern 

13911 Enterprise Dr. 
Garden Grove, CA 92643 
(714) 554-4520 

CompuCable 

2081 Business Center Dr. 

Suite 180 

Irvine, CA 92715 

(714) 635-7330 






Name: 



System: 
Memory: 



HTS General Expansion 
Boards 

KIM-1 and OSI C1P 
2K bytes 21 14L Static 
RAM, 4K bytes 2716 
PROM 
Hardware: 32 lines I/O port 
Description: Low-cost general expan- 
sion boards for the KIM-1 or OSI C1P. 
Occupies 8K block of memory, loca- 
tion is switch selectable on any 8K 
boundary. Sixty-plus page manual 
describes two board designs, GEB1 uses 
2K of 2114L RAM while GEBII uses 
two 2Kx8 RAM chips. GEBII ports 
overlap 64 bytes at upper boundary of 
RAM. Both boards provide 32 port lines 
using 6532 ports with instructions in- 
cluded for substituting 6522 VIA. 
Manual provides wiring diagrams, wire 
lists, parts lists and instructions for 
wire-wrap or point-to-point construc- 
tion on Vector boards. Buffered bus is 
similar to KIM-1 structure. I/O con- 
nections made via DIP sockets. Con- 
nection details for KIM-1 and OSI C1P 
extensively detailed in manual. Can 
also be used for AIM 65 and SYM. 
Price: $10.00 

Available: Hunter Technical Services 
P.O. Box 359 
Elm Grove, WI 53122 
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Next Month in MICRO 



FORTH Feature 

• LIFE in FORTH and BASIC — FORTH and 

BASIC versions of the educational game 
LIFE are presented, with a detailed 
description and comparison. 

• Using FORTH with the 6502 — A 

complete extension, a debugging or 
decompiling tool, and an application utility 
all built into a flexible FORTH enhancement, 
with enough room for other similar 
expansions and applications. 

• Stepper Motor Control — A FORTH 
Approach — Stepper motors translate 
digital commands to motion, bridging the 
gap between computers and robots. A 
flexible command language, written in 
FORTH, translates natural, English-like 
commands to precisely controlled 
movement. 

• FORTH: A Viable Alternative — An 

introduction to FORTH, from FORTH, Inc. 



Other Features 

Inspector (for the TRS-80C Color Computer) 

AIM Assembler Listings 

List-Corrupted SYM-bols 

Atari Countdown Timer 

Applesoft Input Anything 

Fast Joystick Input for C1P 

Credit Box Creator for the Apple 



Columns 

Pet VET 

From Here to Atari 

New! The Single Life (for single board users) 



Plus Our Regular Departments 

Software Catalog 
Hardware Catalog 
6502 Bibliography 
...and more! 



40% OFF 



Your money goes farther when you sub- 
scribe. During the course of a year, when you 
subscribe, you save 40% (in the U.S.). 

Pay only $18.00 ($1.50 a copy) for 12 monthly 
issues of MICRO sent directly to your home or 
office in the U.S. 



More MICRO for Less Money When 
When You Subscribe, until December 31st 



But on the newsstand — if you can locate the 
issue you want — you pay $30.00 a year ($2.50 
a copy). 

Save 40% and make sure you get every issue. 
Subscribe to MICRO today. 



MICRO 

34 Chelmsford Street 
P.O. Box 6502 
Chelmsford, MA 01824 

Please send me MICRO for _ 1 year 2 years 

NOTE: Airmail subscriptions accepted for 1 year only. 



Subscription Rates Effective January 1, 1982 



Country 



Rate 



Check enclosed $_ 
Charge my 

No 



VISA account 
Mastercard account 



Expiration date 
Name 



United States 

Foreign surface mail 

Europe (air) 

Mexico, Central America, Mid East, 

N. & C. Africa 
South Am., S. Afr., Far East, 

Australasia, New Zealand 



$24.00 1 yr. 
42.00 2 yr. 
27.00 
42.00 

48.00 

72.00 



* Airmail subscriptions accepted for only 1 year. 
For U.S. and Canadian 2-year rates, multiply by 2. 



Address 



City/State . 



Job Title: 



-Zip 



Type of Business/Industry: 
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ONE OF THE WORLDS LARGEST INVENTORIES 



ViSiCalCListS200.00 now $149. 

VisiFile ust 5250.00 now $ 1 99, 

Horrlblescope (Disk) ust S15.00 



NEW PROGRAMS 
S29 



now 



$3.99 



MISCELLANEOUS 

Escape Worn Aciurus S29.95 now $35.3* 

Basic Mailer S69 95 now $3».*» 

Memory Management II &S9 95 now $43.4* 

Caslle Wollenslein S29 95now $33.3* 

Upper Reaches ol Apshai S19.95 now $14.4* 

BndgeTulO' 539 95 now $35.1* 

PASCAL Animation Tools $43.** 



Hand Holding BASIC 

UT-100 Emulator 

Space Quark 

Benealh Apple DOS (Book) 

Birlh ol Ihe Phoenix 

Goblins 

Painter Powei 

U.S.COnstitulion 

Merger 

Super Stellar Trek 

LISA 

V-Plol (Yuccipal 

V-Stat 

V-Pnnl 



3rain Surgeon S49.95 



Into Master 

Waterloo II 

Fantysland2U41 

Torpedo Terror 

Speedstar 

Kaves ot Karkhan 

Dos Boss 

Memorex Disks 

Verbatim Datalite-piam w/hubs 

Dysans 

Flipsort Box 

Scotch Disk Cleaner 

Atari -/TRS-8CT 'Pet ■ 



$44.** 
$45.** 
$35.3* 
$14.4* 
$13.** 
$33.3* 
$33.4* 
$3S.3* 
$43.4* 

$33.a* 

$47.** 

$35.3* 

$35.3* 

$35.3* 

$43.4* 

$137.4* 

$41.3* 

$50.** 

$31.1* 

$114.** 

$43.3* 

$30.3* 

10 for $34.** 

10 lor $37.** 

10 lor $49.** 

$3*. 40 

529 95 now $»*.»* 

Writ* for Irjf ormallon 



S29.95 now 
S19.95 now 
S14 95 now 
527 50 now 
$39 95 now 
S29 95 now 
S49 95 now 
$39 95 now 
S79 95 now 
529.95 now 
529 95 now 
529 95 now 



SI 50 00 now 
549 95 now 
559 95 now 
S24 95 now 

SI3995 now 
.549 95 now 
524 00 r 




GAMES 

HiRes Soccer 529 95 now $35.3* 

Apple 'Olds 529 95 now $35.3* 

Wurst ot Huntington Computing $ 1*.** 

Gobbler S24 95 now $11.1* 

Ultima S39 95 now $33.4* 

Autobahn 529 95 now $15.3* 

Battle Cruiser Action 544 95 now $34.4* 

Gorgon S39 95 now $33.4* 

Super Stellar Trek $39 95 now $33.4* 

Helllire Warrior S39 95 now $33.** 

Gamma Goblins $29.95 now $35.3* 

Mission Asteroid 519 95 now $1T.»* 

Wizardry 549 95 now $43.4* 

Star Mines $29 95 now $35.3* 

Warp Factor S39 95now $33.** 



WURST OF 



Read Softalk's review 

on page 87 of Ihe 

October issue 

$19.99 



Sneakers 

Copts S Robbers S34 

Pot-OGold I S39 

Pot-O-Goldll S39 

Ring ol Salurn 539 

Streets ol the City & Trucker 524 

President Elect 539 

Dis-o-Doc S72 

Med Fly Mania S29 

Hungry Boy $24 

Anova S74 

Solitaire 529 

The Source StOO 

Race lor Midnight S29 

HiRes Secrets S125 

Banners I S34 

Complete Graphics (Tablet) St 19 

Special Ettecls (Tablet) S69 

Inkwell Apple- III S150 

Snack Attack . S29 

VPIot 529 

Disasem/65 529 

The Inspector (Disk or Prom) 549 

The Book S19 

Don I (Book) .58 

Using 6502 Assembly Language 519 

Expandapon S59 

Firebird ...... S29 

Thiet 

Threshold S23 

Targei Planner SI 95 

Paddle Adapple S29 
So Cal Research . S14 

Word Handler 5250 

GAMES 

Microsoft Adventure a29 95 

Wizard and the Princess S32 95 

Flight Simulator . . 534.95 

Odyssey 529.95 

Sargon II S34.95 

Space Eggs S29.95 

Hi-ResCribbage 524 95 

Lords ot Karma (cass ) S20 00 

Oh Shoot 

ABM ,....,.....-..., 524.95 

Computer Conllict . . 539.95 

Computer Air Combat $59 95 

Temple ol Apshai $39 .95 

Zork 53995 

All Nibble Software 

Robot Wars S39 95 

Cranston Manor S34 95 

Oragon's Eye S24 95 

Computer Acquire 520.00 

Twala s Lasl Redoubt S29 95 

Alien Ram S24 95 

Alien Typhoon 524.95 

Raster Blaster S29.95 

3-D Skiing 524 95 

Creature Venture S24 95 

Galaxy Space War I $39 95 

Meteoroids in Space 519 95 

Dragon Fire .549 95 

Pool 15 534 95 



25 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
39 now 
95 now 
95 now 
95 now 
95 now 
I 00 now 
95 now 
00 now 
95 now 
95 now 
95 now 
00 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
95 now 
97 now 
00 now 
95 now 
95 now 
00 now 



now 

no — 

Man 
now 
now 



-1S% 

now 



now 



now 



$35.3* 
$3*.** 
$33.4* 
$31.4* 
$33.4* 
$31.1* 
$31.4* 
$•1.4* 
$14.3* 
$11.1* 
$*3.7* 
$15.1* 
•4*.** 
$35.3* 

$104.1* 
$3*.** 

$1*1.4* 
$**.7* 

$130.4* 
$35.3* 
$35.3* 
$15.3* 
$43.3* 

in.*> 

$4.45 

$14.4* 
$30.4* 
$35.3* 
$35.3* 
$34.34 

$145.4* 
$14.4* 
$13.45 

$313.4* 

$35.3* 
$14.** 
$3».4» 
$15.3* 
$1*.4* 
$15.1* 
$11.1* 
$1*.** 
$1*.** 
$11.1* 
$35.** 
$31.** 
$33.4* 
$33.** 
•M Hit 
$33.** 
$3*.4* 
$11.1* 
$!*.** 
$15.3* 
$31.1* 
$11.1* 
$15.1* 
$11.1* 
$11.1* 
$33.** 
$1*.** 
$41.4* 
$3*.4* 



List S285.00 now 



NEC Green Screen Monitor 

Zenith Green Screen Monitor usisi 59.00 

Ulysses ust S34.95 

Speed/asm ust S39.95 

Lisa 2.5 ust S79.95 

Dinosaurs 



List S1 5.00 now 



$199.00 
$109.00 
w $29.69 
, $33.89 
w $67.89 
$12.69 



Apple 



BMP Joystick 

Here's a joytsick you won't 
want to be without. It's the only 
joystick we know about that al- 
lows you to change the axis 
with a flip of a switch. Only the 
highest quality parts are used. 

A real bargain at 

$49.95 



ORDER BY PHONE 
800-344-41 1 1 (outside Calif.) 
800-692-4143 (inside Calif.) 

209-992-54 11 (foreign or local) 

Apple >s a 'cg-siBied trademark ol Appw Compulei mc 



HUNTINGTON COMPUTING 

Post Office Box 787 
Corcoran, California 93212 



$$ 



We lake MasterCard. VISA or American Ex* 
press (Include card # and expiration dale) 
California residents add 6% tax Include 
$2.00 lor postage Foreign and hardware 
extra Send for free catalog Prices subject to 
change 



J 



